Begin
label1.Color:=clTeal;
end;
Пример 2: Создать программу, которая при нажатии кнопки увеличивает шрифт метки:
Обработчик события onClick кнопки Button1 можно записать следующим образом:
procedure TForm1.Button1Click(Sender: TObject);
Begin
label1.Font.Size:= label1.Font.Size+1;
end;
Контрольные вопросы:
- Для чего служат следующие свойства: Caption, Color, Text, Font, Height, Width, Hint, ShowHint, Cursor, Enabled, Visible, Top, Left, Name.
Задания к лабораторной работе №7:
1. Организовать управление размером шрифта метки с помощью кнопок (одна кнопка – увеличивает шрифт, другая – уменьшает). Кнопки снабдить всплывающими подсказками. Изменить курсор мыши над кнопками.
2. Создать 2 кнопки, при нажатии на первую метка становится невидимой. При повторном нажатии показать метку. Вторая кнопка меняет цвет метки.
3. Организовать управление положением метки на форме с помощью кнопок (одна кнопка – поднимает метку, другая – опускает). Кнопки снабдить всплывающими подсказками.
4. Создать три кнопки: при нажатии на первую метка становится невидимой, при нажатии на вторую – видимой, при нажатии на третью – шрифт метки увеличивается в 3 раза. Изменить курсов над кнопками.
5. Создать две кнопке. При нажатии на кнопку метка закрашивается в серебряный цвет, при нажатии на вторую - текст метки становится пурпурным. Метку снабдить всплывающими подсказками.
6. Организовать управление положением метки на форме. При нажатии на одну кнопку – метка сдвигается влево, при нажатии на вторую кнопку – метка сдвигается вправо. Объекты снабдить всплывающими подсказками. Добавить объект, который выполняет операцию(какую, придумать самостоятельно) при двойном щелчке мыши.
Приложение 1. Свойство Color. Тип TColor.
Свойство Color определяет цвет фона компонента. Значение цвета может задаваться как значение, определяющее интенсивности красного, зеленого и синего цветов в формате RGB, или равным одной из перечисленных ниже предопределенных в Delphi констант.
Константа Значение цвета
| clBlack | Черный |
| clMaroon | Темно-бордовый |
| clGreen | Зеленый |
| clOlive | Оливково-зеленый |
| clNavy | Темно-синий |
| clPurple | Пурпурный |
| clTeal | Морской воды |
| clGray | Серый |
| clSilver | Серебряный |
| clRed | Красный |
| clLime | Лимонно-зеленый |
| clBlue | Синий |
| clYellow | Желтый |
| clFuchsia | Сиреневый |
| clAqua | Голубой |
| clWhite | Белый |
| clBackground | Текущий цвет фона стола Windows |
| clScrollBar | Текущий цвет полос прокрутки |
| clActiveCaption | Текущий цвет фона полосы заголовка в активном окне |
| clInactiveCaption | Текущий цвет фона полосы заголовка в неактивном окне |
| clMenu | Текущий цвет фона меню |
| clWindow | Текущий цвет фона окон |
| clWindowFrame | Текущий цвет рамок окон |
| clMenuText | Текущий цвет текста меню |
| clWindowText | Текущий цвет текста окон |
| clCaptionText | Текущий цвет текста заголовка в активном окне |
| clActiveBorder | Текущий цвет бордюра активного окна |
| clInactiveBorder | Текущий цвет бордюра неактивного окна |
| clAppWorkSpace | Текущий цвет рабочей области приложений |
| clHighlight | Текущий цвет фона выделенного текста |
| clHightlightText | Текущий цвет выделенного текста |
| clBtnFace | Текущий цвет поверхности кнопок |
| clBtnShadow | Текущий цвет теней, отбрасываемых кнопками |
| clGrayText | Текущий цвет текста недоступных элементов |
| clBtnText | Текущий цвет текста кнопок |
| clInactiveCaptionText | Текущий цвет текста заголовка в неактивном окне |
| clBtnHighlight | Текущий цвет выделенной кнопки |
| cl3DDkShadow | Цвет темных теней трехмерных элементов; только для Windows 95 или NT 4.0 |
| cl3DLight | Светлый цвет на краях освещенных трехмерных элементов; только для Windows 95 или NT 4.0 |
| clInfoText | Цвет текста советов; только для Windows 95 или NT 4.0 |
| clInfoBk | Цвет фона советов; только для Windows 95 или NT 4.0 |
Первая часть этих констант соответствует определенным цветам. А вторая часть определяется той схемой цветов, которую установил пользователь в Windows. Пользователь может менять эту схему с помощью Панели Управления Windows. Таким образом, эти цвета могут изменяться от системы к системе. Например, clBtnFace может соответствовать серому цвету в одной схеме и желтовато-коричневому в другой.
Как правило, лучше использовать в приложении эти системно зависимые цвета. Тогда ваше приложение не будет выбиваться из общей гаммы цветов, на которую настроился пользователь.
Вместо использования этих констант можно задавать TColor как 4-байтовое шестнадцатеричное число, три младших разряда которого представляют собой интенсивности синего, зеленого и красного цвета соответственно. Например, значение $00FF0000 соответствует чистому синему цвету, $0000FF00 - чистому зеленому, $000000FF - чистому красному. $00000000 - черный цвет, $00FFFFFF - белый.
Старший байт зарезервирован для служебной информации. Определить нужный цвет можно во время проектирования, выполнив двойной щелчок мышью на значении соответствующего свойства инспектора объектов.
Если свойство ParentColor компонента установлено в true (это делается по умолчанию), то цвет фона данного компонента определяется свойством Color контейнера, содержащего данный компонент. Например, цвет метки edit1 определяется цветом формы. Это позволяет автоматически согласовывать цвета компонентов, содержащихся в одной области окна. Как только вы задаете в Инспекторе Объектов или программно значение Color, свойство ParentColor переключается в false.