Компонент TButton - кнопка.

Позволяет создать кнопку, с которой можно связать различные действия. Компоненты класса TButton широко используются для управления программами. Данный компонент находится на вкладке Standard и выбирается щелчком мыши по кнопке .

После размещения компонента на форме, можно изменить название кнопки с помощью свойства Caption.

property Caption: TCaption;

Пример. Необходимо создать процедуру обработки события – щелчок по кнопке закрывает форму. Процедура обработки события связывается с событием OnClick для данной кнопки. Процедура может иметь следующий вид:

procedure TForm1.Button1Click (Sender: TObject);

Begin

Form1.Close;

End;

Таким образом, при щелчке по созданной кнопке будет закрываться форма Form1.

На рис. 13 приведены примеры компонентов класса TEdit с различными настроенными свойствами.

Рис. 13. Примеры компонентов класса TButton

Компонент TBitBtn – кнопка с изображением

Данная кнопка представляет собой разновидность стандартной кнопки TButton. Компонент TBitBtn находится на вкладке Additional и выбирается щелчком мыши по кнопке .

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

property Glyph: TBitmap;

В комплект Delphi входит сравнительно большое количество изображений для размещения на этих кнопках. Обычно изображения находятся в каталоге C:\Program Files\Common Files\Borland Shared\Images\Buttons.

На кнопку BitBtn можно поместить рисунок предопределенного вида, который будет означать выполнение некоторого стандартного действия. Для этого используют свойство Kind.

property Kind: TBitBtnKind;

Свойство Kind может принимать множество значений – например, bkOK, bkCancel, bkHelp, bkYes, bkNo, bkClose, bkAbort, bkRetry, bkIgnore, bkAll.

С помощью свойства Layout можно задать расположение рисунка на кнопке.

property Layout: TButtonLayout;

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

blGlyphLeft – рисунок прижимается к левому краю;

blGlyphRight – рисунок прижимается к правому краю;

blGlyphTop – рисунок прижимается к верхнему краю;

blGlyphBottom – рисунок прижимается к нижнему краю.

Свойство Margin определяет расстояние в пикселях от края кнопки до рисунка.

property Margin: Integer;

Свойство Spacing определяет расстояние в пикселях от рисунка до надписи на кнопке.

property Spacing: Integer;

На рис. 14 приведены примеры компонентов класса TBitBtn с различными значениями свойства Kind.

Рис. 14. Примеры компонентов класса TBitBtn