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

UptoLike

Составители: 

- 52 -
Присваивание типа шрифта можно проводить в обработчике события
OnApply, возникающего при нажатии кнопки Apply на данной панели
(кнопка Apply появляется на панели только при назначении обработчика
данного события).
5.20.4. КОМПОНЕНТ TColorDialog
Компонент TColorDialog служит для выбора цвета, выбранное значение
содержится в свойстве Color (диалоговое окно компонента приведено на
рис.10).
Например
, в нижеследующем примере показано, какперекраситьформу
Form1 в выбранный (заданный глобальной переменной Color) цвет
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
with ColorDialog1 do
begin
If Execute then
Form1.Color:=Color;
end;
end;
Событий компонент TColorDialog не имеет.
Рис.9. Диалоговое окно компонента TFontDialog
                                      - 52 -




        Рис.9. Диалоговое окно компонента TFontDialog
   Присваивание типа шрифта можно проводить в обработчике события
OnApply, возникающего при нажатии кнопки Apply на данной панели
(кнопка Apply появляется на панели только при назначении обработчика
данного события).

5.20.4. КОМПОНЕНТ TColorDialog

   Компонент TColorDialog служит для выбора цвета, выбранное значение
содержится в свойстве Color (диалоговое окно компонента приведено на
рис.10).
   Например, в нижеследующем примере показано, как ‘перекрасить’ форму
Form1 в выбранный (заданный глобальной переменной Color) цвет

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
 with ColorDialog1 do
 begin
  If Execute then
    Form1.Color:=Color;
 end;
end;

   Событий компонент TColorDialog не имеет.