Иллюстрированный самоучитель по Kylix


Листинг 13 6 Установка цвета кисти



Листинг 13.6.Установка цвета кисти

procedure TForm1.Button1Click(Sender: TOtrject); begin
Canvas.Brush.Color := clBlue; end;

Стиль кисти

Стиль кисти определяет, каким образом будет заполняться область на канве или геометрическая фигура. Это позволяет программисту комбинировать цвет кисти с уже имеющимися цветами канвы.

Для смены стиля кисти достаточно напрямую установить свойство Style в одно из следующих значений:

bsSolid, bsClear, bsHonzontal, bsVertical, bsFDiagonal, bsBDiagonal, bsCross, bsDiagCross, bsDense1, bsDense2, bsDense3, bsDense4, bsDense5, bsDense6 или bsDense7.

Пример, приведенный в листинге 13.7, показывает, как можно установить стиль кисти. Здесь происходит последовательная установка нескольких значений стиля кисти.



Начало Назад Вперед


Книжный магазин