Объект ColorDialog

Объект FontDialog

Begin

Begin

Практическая работа

Создадим приложение для выбора графического файла и вывода его содержимого в окно. На форме расположим компоненты Image, Button, OpenPictureDialog (OPD), StatusBar (SB) для вывода полного имени показываемого файла.

При щелчке по кнопке «Открыть», должно появляться стандартное диалоговое окно открытия графического файла.

procedure TForm1.Button1Click(Sender: TObject);

If OPD.Execute and FileExists(OPD.FileName) then

Image1.Picture.loadfromfile(OPD.FileName);

Image1.stretch:=true;

SB.simpletext:=OPD.FileName;

end;

end;

Компонент создает и обслуживает стандартное окно выбора шрифта

Свойство	Значение
Font	Содержит результат выбора шрифта
Divice	Определяет тип устройства, для которого выбирается шрифт: fsScreen – экран; fsPrinter – принтер; fsBoth – шрифты, поддерживаемые и экраном, и принтером.
MinFontSize	Минимальное значение размера шрифта
MaxFontSize	Максимальное значение размера шрифта
Options	Настройка диалога

Компонент создает и обслуживает стандартное окно выбора цвета.

Свойство	Значение
Color	Содержит выбранный цвет
CustomColors	Содержит до 16 цветов, определенных пользователем. Каждая строка имеет следующий формат: ColorX=HHHHHH, где X – буква от А до Р, определяющая номер цвета, HHHHHH –шестнадцатеричное представление цвета в формате RGB.
Options	Определяет настройку окна: cdFullOpen – паказывать с развернутчм окном выбора цвета пользователем; cdPreventFullOpen – запретить показ окна выбора цвета пользователя; cdSolidColor – выбирать ближайший сплошной цвет;

Дата добавления: 2015-05-09