Установка цвета кисти
Листинг 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, показывает, как можно установить стиль кисти. Здесь происходит последовательная установка нескольких значений стиля кисти.