Разработка прикладных программ для ОС WINDOWS с помощью интегрированных сред Delphi / C++Builder. Баканов В.М. - 43 стр.

                                        - 43 -


   Список генерируемых событий включает OnClick, OnDbClick и др., со-
бытие OnResize возникает при изменении размеров панели.

5.10. КОМПОНЕНТ TBitBtn

   Компонент TBitBtn представляет собой кнопку с пиктограммой и текстом
(на рис.6 данный компонент является 4-м сверху в среднем ряду, в палитре
компонентов расположен на странице Additional). В отличие от родственных
компонентов TButton и SpeedButton данный компонент имеет ряд дополни-
тельных удобств в использовании.
   В Delphi определены стандартные типы кнопок, определяемые свойством
Kind; для каждой из них определены передаваемый форме результат, назва-
ние и картинки. Достаточно установить нужное значение Kind, и кнопка при-
обретет нужный вид. Например, в случае Kind=bkHelp нажатие кнопки
инициализирует систему помощи, bkClose-кнопка закрывает форму.
   При Kind=bkCustom параметры кнопки определяются пользователем.
Стиль кнопок задается свойством Style, текст на кнопке - свойством Caption,
располагаемая на теле кнопки пиктограмма - Glyph, промежуток между пик-
тограммой и текстом - Spacing и т.д. Присвоение свойству Enabled значения
FALSE (в RunTime также) дезактивирует кнопку (устанавливает ее в неак-
тивное 'серое' состояния); эта возможность удобна, например, при необхо-
димости деактивировать некоторые кнопки, не задействованные в данном
режиме работы программы.
   Из событий наиболее часто используется OnClick, также генерируются
OnKeyDown, OnKeyPress, OnKeyUp и др.
   Из компонентных методов представляют интерес Click (программная им-
митация нажатия кнопки).
   Процедура, например, 'отключающая' кнопку BitBtn1 после нажатия
кнопки BitBtn2, может выглядеть следующим образом

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
with BitBtn1 do
 begin
  Сарtion:='Прощай навсегда ...'; { текст на кнопке ...}
  Enabled:=FALSE; { деактивировать кнопку }
 end;
end; { Баканов В.М., МГАПИ, кафедра ИТ-4,1996-2000 }

   Вновь      активировать     эту   кнопку      можно только присваиванием
BitBtn1.Enabled:=TRUE.

   Специальная кнопка (компонент TSpeedButton) может иметь как зависи-