Читать «Виртуальная библиотека Delphi» онлайн - страница 75
Unknown
◦ Объект TCanvas, очень похожий на TCanvas из VCL (но более компактный и эффективный). Для рисования на существующем DC, имеется конструктор: NewCanvas(DC): PCanvas
◦ TBitmap, также напоминает TBitmap из VCL. Конструкторы:
▪ NewBitmap(Width, Height): PBitmap.
▪ NewDIBBitmap(Width, Height, PixelFormat): PBitmap
◦ Объект TImageList (подобно аналогичному в VCL). Конструктор: NewImageList(AOwner: PControl): PImageList.
◦ Главный объект библиотеки KOL — это TControl. Он может выполнять роль любого визуального контрола взависимости от того, какой "конструктор" использован для его создания. Имеются следующие "конструкторы", точнее, глобальные функции конструирования (синтаксис намеренно видоизменен):
▪ NewApplet(Caption: String): PControl
▪ NewForm(AParent: PControl): PControl
▪ NewPanel(AParent; EdgeStyle:{ esRaised, esLowered, esNone }): PControl
▪ NewSplitter(AParent; MinSize1, MinSize2: Integer): PControl
▪ NewGroup(AParent; Caption): PControl
▪ NewLabel(AParent; Caption): PControl
▪ NewWordWrapLabel(AParent; Caption): PControl
▪ NewLabelEffect(AParent; Caption; ShadowDeep): PControl
▪ NewButton(AParent; Caption): PControl
▪ NewBitBtn(aParent, aCaption, aOptions: [ bboImageList, bboNoBorder, bboNoCaption, bboFixed ] , aLayout: { glyphLeft, glyphTop, glyphRight, glyphBottom, glyphOver } , GlyphBmp _or_ ImageList, GlyphCount __or__ ImgIdx _and_ GlyphCount _shl16): PControl
▪ NewCheckbox(AParent; Caption): PControl
▪ NewRadiobox(AParent; Caption): PControl
▪ NewEditbox(AParent; Options: Set of [ eoNoHScroll, eoNoVScroll, eoLowercase,
▪ NewRichEdit(AParent, Options): PControl
▪ NewRichEdit1(AParent, Options): PControl
▪ NewListbox(AParent; Options: Set of [ loNoHideScroll, loNoExtendSel, loMultiColumn, loMultiSelect, loNoIntegralHeight, loNoSel, loSort, loTabstops ]): PControl
▪ NewCombobox(AParent; Options: Set of [
▪ NewPaintbox(AParent)
▪ NewGradientPanel(AParent; Color1, Color2): PControl
▪ NewGradientPanelEx(Color1, Color2, Style: ( gsHorizontal, gsVertical, gsRectangle, gsElliptic, gsRombic ), Layout: ( glTopLeft, glTop, glTopRight, glLeft, glCenter, glRight, glBottomLeft, glBottom, glBottomRight )): PControl
▪ NewProgressbar(AParent): PControl
▪ NewProgressbarEx(AParent; Options: set of [ pboVertical, pboSmooth ]): PControl