Наша первая кнопка или Основные элементы интерфейса.

У многих визуальных объектов существуют следующие параметры в конструкторе:
AParameter - родительский объект контрла
Саption - надпись на объекте.
Их мы описывать не будем :-]
Если говорить про свойства, то тут еще проще. Большинство этих объектов имеют такие же свойства, как и их братья из VCL.

• Button
  
• Panel
  
• GroupBox
  
• Label
  
• CheckBox и RadioBox
  
• EditBox
  
• RichEdit
  
• ListBox
  
• ComboBox
  
• ProgressBar

Button

Кнопка она и в Африке кнопка :). Аналог TButton в VCL.

function NewButton( AParent: PControl; const Caption: String ): PControl;

 

Параметр Style может иметь следующие флаги:

bs_bottom

помещает текст кнопки в нижней части ограничивающего прямоугольника

bs_center

центрирует текст кнопки

 

bs_left

помещает текст кнопки в левой части ограничивающего прямоугольника

 

bs_right

помещает текст кнопки в правой части ограничивающего прямоугольника

 

bs_top

помещает текст кнопки в верхней части ограничивающего прямоугольника

 

bs_vcenter

помещает текст кнопки в центральной (по вертикали) части ограничивающего прямоугольника

 

bs_multiline

приносит текст на другую строчку, если он не помещается на кнопке в ширину

Несколько свойств позволяющих обойтись без жонглирования стилями.

LikeSpeedButton - кнопка становится по свойствам похожа на TSpeedButton из VCL

свойство TextAlign:TTextAlign - указывает расположение текста на кнопке. Может принимати следующие значения :
type TTextAlign =( taLeft, taRight, taCenter );
По умолчанию taCenter.

BitBtn

Кнопка не принимающая фокуса (почти полный аналог VCL SpeedButton)

function NewBitBtn( AParent: PControl; const Caption: String; Options: TBitBtnOptions; Layout: TGlyphLayout; GlyphBitmap: HBitmap; GlyphCount: Integer ): PControl;

Options:

• bboImageList - используется ImageList
• bboNoBorder - без всякой окантовки
• bboNoCaption - кнопка без надписи
• bboFixed - фиксированное положение

  ---

  Layout отвечает за то где будет находится рисунок на кнопке:

• glyphLeft - слева
• glyphTop - сверху
• glyphRight - справа
• glyphBottom - снизу
• glyphOver - посередине

Panel

Аналог контрола TPanel из Delphi. На него (как и на форму), можно "насаживать" другие визуальные элементы.

function NewPanel( AParent: PControl; EdgeStyle: TEdgeStyle ): PControl;

EdgeStyle - стиль панели. Может иметь следующие значения:

• esRaised - Обычная панель. Вогнутая наружу ( как на рисунке).
• esLowered - Вогнута внутрь
• esNone - Контуры панели никак не показываются
  

GroupBox

NewGroup ,как можно догадаться и по названию, аналог Delphi-компонента TNewGroup. GroupBox является родительским объектом, также как и Panel.

function NewGroupbox( AParent: PControl; const Caption: String ): PControl;

Label

Пару слов про объекты, функции которых в Delphi выполняет класс TLabel. В KOL 2 обьекта- это Label и WordWrapLabel. Чем они отличаются друг от друга ? В отличие от Label , WordWrapLabel производит перенос текста,написанного на нем, на другую строку. В общем это все отличие.

function NewLabel( AParent: PControl; const Caption: String ): PControl;

function NewWordWrapLabel( AParent: PControl; const Caption: String ): PControl;

CheckBox и RadioBox

RadioBox
CheckBox

Аналоги VCL-классов TCheckBox и TRadioBox. Проверка, выбран ли этот компонент, также осуществляется через свойство Checked.

function NewCheckbox( AParent: PControl; const Caption: String ): PControl;

function NewRadiobox( AParent: PControl; const Caption: String ): PControl;

EditBox

Аналог TEdit. Для того, чтобы получить текст введенный пользователем, надо обратится к свойству Text.

function NewEditbox( AParent: PControl; Options: TEditOptions ): PControl;

Параметр Options может состоять из следующих значений :

• eoNoHScroll - нет горизонтальной прокрутки
• eoNoVScroll - нет вертикальной прокрутки
• eoLowerCase - строчные (маленькие) буквы
• eoMultiline - многострочный
• eoNoHideSel - выбранный текст подсвечивается, даже если поле не имеет фокуса
• eoOemConvert -
• eoPassword - все вводимые символы отображаются при помощи одного символа. По умолчанию этим символом служит звездочка
• eoReadOnly - только для чтения
• eoUpperCase - прописные (большие) буквы
• eoWantReturn - заставляет Windows переводить строку, когда пользователь нажимает «Enter»
• eoWantTab - перевод фокуса когда пользователь нажимает «Tab»

RichEdit

Предназначен для редактирования многострочного текста.

function NewRichEdit( AParent: PControl; Options: TEditOptions ): PControl;

Параметры Options аналогичны EditBox.

• Чтобы загрузить текст используйте функцию:
  function RE_LoadFromFile( const Filename: String; Format: TRETextFormat; SelectionOnly: Boolean ): Boolean;

  Сохранить:
  function RE_SaveToFile( const Filename: String; Format: TRETextFormat; SelectionOnly: Boolean ): Boolean;

  • Filename - путь до файла
  • Format - формат текста:
    
    

  reRTF - нормальный RTF
  reText - только текст (без OLE обектов)
  reTextized - простой текст с объектами OLE
  rePlainRTF - reRTF без языковых-специфических ключевых слов
  reRTFNoObjs - reRTF без объектов OLE
  rePlainRTFNoObjs - rePlainRTF без объектов OLE

ListBox

Аналог TListBox из VCL. Свойства в общем то те же (почти :-) .

function NewListbox( AParent: PControl; Options: TListOptions ): PControl;

Параметр Options может состоять из следующих значений :

• loNoHideScroll - добавляет прокрутку вверх-вниз
• loNoExtendSel - выделяет сразу первый пункт
• loMultiColumn -
• loMultiSelect - автоматическое выделять несколько строк
• loNoIntegralHeight -
• loNoSel - нет выделения строк (только "окантовка")
• loSort - список сортируется
• loTabStops - не реагирует на Tab

Некоторые свойства:

Свойство	Описание
Items[idx:index]:string	Обращение к строке под индексом idx
CurIndex :integer	Индекс текущей строки
Count :integer	Всего строк
Add(s:string):integer	Добавляет в список строку
Insert(idx:integer;s:string)	Вставка в список в позицию idx строки s
Delete(idx:integer)	Удаление строки с индексом idx
Clear	Очистка списка

 

ComboBox

 

ComboBox

Аналог TComboBox

function NewCombobox( AParent: PControl; Options: TComboOptions ): PControl;

Options могут быть следующие:

• coReadOnly - только для чтения
• coNoHScroll - текст не прокручивается по горизонтали
• coAlwaysVScroll - при "выпадении", комбобокс всегда имеет вертикальную прокрутку
• coLowerCase - маленькими буквами
• coNoIntegralHeight -
• coOemConvert -
• coSort - список сортируется
• coUpperCase -заглавные буквы

Многие свойства схожи со свойствами ListBox

ProgressBar

Аналог TProgressBar из VCL

function NewProgressbar( AParent: PControl ): PControl;

function NewProgressbarEx( AParent: PControl; Options: TProgressbarOptions ): PControl;

NewProgressBarEx -это расширенный прогрессбар.
Его Options могут принимать следующие значения:

• pboVertical - Полоска бежит не слева на права, а снизу в верх
• pboSmooth - Полоска не в виде квадратиков, а сплошной линией

Основные свойства этих элементов:
MaxProgress - максимальный диапазон "бегунка"
Progress - текущее положение

Источник: http://bonanzas.rinet.ru , http://kol.mastak.ru