 |
Создание динамических библиотек(DLL)
|
|
|
|
ColorDialog
Компонент ColorDialog вызывает диалоговое окно выбора цвета, представленное на рис. 8.9. В нем пользователь может выбрать цвет из базовой палитры или, нажав кнопкуОпределить цвет, раскрыть дополнительную панель (на рис. 8.9 она раскрыта), позволяющую синтезировать цвет, отличный от базовых. Синтезированный цвет можно добавить кнопкой Добавить в набор в палитру дополнительных цветов на левой панели и использовать его в дальнейшем.
| Рис. 8.9 Диалоговое окно выбора цвета | 
|
Основное свойство компонента ColorDialog — Color. Это свойство соответствует тому цвету, который выбрал в диалоге пользователь. Если при вызове диалога желательно установить некоторое начальное приближение цвета, это можно сделать, установив Color предварительно во время проектирования или программно. Свойство CustomColors типа TStrings позволяет задать заказные цвета дополнительной палитры. Каждый цвет определяется строкой вида
<Имя цвета>=<шестнадцатиричное представление цвета>;
Имена цветов задаются от ColorA (первый цвет) до ColorP (шестнадцатый, последний). Например, строка
ColorA=808022
задает первый заказной цвет. При задании цвета 2 младших разряда описывают интенсивность красного цвета, следующие 2 — зеленого, старшие — синего.
Свойство Options содержит множество следующих опций:
| cdFullOpen | Отображать сразу при открытии диалогового окна панель определения заказных цветов |
| cdPreventFullOpen | Запретить появление в диалоговом окне кнопки Определить цвет, так что пользователь не сможет определять новые цвета |
| cdShowHelp | Добавить в диалоговое окно кнопку Справка |
| cdSolidColor | Указать Windows использовать сплошной цвет, ближайший к выбранному (это обедняет палитру) |
| cdAnyColor | Разрешать пользователю выбирать любые не сплошные цвета (такие цвета могут быть не ровными) |
По умолчанию все опции выключены.
|
|
|
Приведем пример применения компонента ColorDialog. Если вы хотите, чтобы пользователь мог задать цвет какого-то объекта, например, цвет фона компонента Memo1, то это можно реализовать оператором
if ColorDialog1.Execute then
Memo1.Color:= ColorDialog1.Color;
SaveDialog
Компоненты OpenDialog и SaveDialog вызывают стандартные диалоги Windows открытия и сохранения файлов.
Открытие соответствующего диалога осуществляется методом Execute. Если в диалоге пользователь нажмет кнопку открыть (Сохранить), диалог закрывается, метод Execute возвращает true и выбранный файл отображается в свойстве компонента FileName. Если же пользователь отказался от диалога (нажал кнопку отмена или ESC), то метод Execute возвращает false.
Значение свойства FileNamмоможно задать перед обращением к диалогу. Тогда оно появится в диалоге как значение по умолчанию в окне Имя файла. Таким образом, например, выполнение команды Сохранить как, по которой в файле с выбранным пользователем именем надо сохранить текст окна редактирования Memo1, может иметь вид:
SaveDialog1.FileName:=Fname;
if SaveDialog1.Execute
Then
Fname:=OpenDialog1.FileName;
Memo1.Lines.SaveToFile(FName);
End;
В этом коде предлагается, что имя файла хранится в строковой переменной FName. Перед вызовом диалога это имя прередается в него как имя файла по умолчанию, а после выбора пользователем файла его выбор запоминается в той же переменной FName и тест сохраняется в этом файле методом SaveToFile.
Типы искомых файлов, появляющиеся в диалоге в выпадающем списке Тип файла задаются свойством Filter. В процессе проектирования это свойство вызывается нажатием кнопки с многоточием около имени этого свойства в Инспекторе объектов. При этом открывается окно редактора:
В примере задан фильтр для документов Word с расширениями.doc и.rtf. После выхода из окна редактирования фильтров заданный вами шаблон появится в свойстве Filter в виде строки.
Свойство InitialDir определяет начальный каталог, который будет открыт в момент начала работы пользователя с диалогом. Свойство DefaultExt определяет значение расширения файла по умолчанию. Если значение этого свойства не задано, пользователь должен указать в диалоге полное имя файла с расширением. Если же задать DefaultExt(например, «txt»), то пользователь может писать в диалоге имя без расширения. В этом случае будет принято заданное расширение.
Свойство Title позволяет вам задать заголовок диалогового окна.
|
|
|
Создание динамических библиотек(DLL)
Он убрал на консультации.
|
|
|
