2015-12-28 14:25:15 +03:00
|
|
|
// Графика. Свойства кисти и пера
|
2015-05-14 22:35:07 +03:00
|
|
|
uses GraphABC;
|
|
|
|
|
|
|
|
|
|
begin
|
2015-12-28 14:25:15 +03:00
|
|
|
Window.Title := 'Свойства кисти и пера';
|
2015-05-14 22:35:07 +03:00
|
|
|
Pen.Color := Color.Red;
|
|
|
|
|
Pen.Width := 3;
|
|
|
|
|
Pen.Style := psDashDot;
|
|
|
|
|
Brush.Style := bsHatch;
|
|
|
|
|
Brush.Color := Color.Green;
|
|
|
|
|
Brush.Hatch := bhDiagonalBrick;
|
|
|
|
|
Brush.HatchBackgroundColor := Color.Bisque;
|
|
|
|
|
Rectangle(20, 20, Window.Width - 20, Window.Height - 20);
|
|
|
|
|
end.
|
