Страница 37 из 59 Компонент TColorDialog TObject->TPersistent—>TCoinponent-^TCommonDialog->TColorDialog Модуль DIALOGS Страница Палитры компонентов Dialogs Предназначен для определения цвета пользователем. Настройка диалога осуществляется через свойство: (Pb) property Options: TColorDialogOptions; TColorDialogOption = (cdFullOpen, cdPreventFullOpen, cdShowHelp); TColorDialogOptions = set of TColorDialogOption; Данные опции определяют: cdFullOpen — полный показ диалога. В этом случае пользователь может выбрать не только один из цветов системной палитры, но и задать собственный; cdPreventFullOpen — запрещение полного показа диалога; cdShowHelp — показ кнопки Help. В диалоге пользователь может определить несколько (до 16) собственных цветов, которые доступны в свойстве: (РЙ property CustomColors: TStrings; Каждый из этих цветов представлен в свойстве CustomColors строкой вида ColorA = SOffaO где ColorA — условное название цвета (могут быть определены цвета с названиями от ColorA до ColorP), а справа от знака равенства стоит его шестнадцатиричное значение в формате RGB. В случае нажатия кнопки ОК возвращаемое значение цвета содержится в свойстве: (РЬ) property Color: TColor; |