Pen instead of Brush.

Davinci Jeremie

Delphi Developer

Tue, 19 Feb 2002 03:00:00 GMT

Pen instead of Brush.

How can I create a filled rectangle with a pen style and mode right now I do
this...

Canvas.Pen.Color := Color;
Canvas.Pen.Style := psSolid;
Canvas.Pen.Mode := pmMask;
Canvas.Pen.Width := 1;
for j := BorderWidth to Height-BorderWidth do // Iterate
begin
Canvas.MoveTo(BorderWidth,j);
Canvas.LineTo(Width-BorderWidth,j);
end; // for

Is there a more efficient way of do this?

Please note that I want to use the pen and not the brush to accomplish this
as the pen mode is set to a mode I want to use. So using FillRect and
Rectangle methods of Canvas object will not work as it uses the Brush to
fill the inside part of the rectangle.

Davinci

ewps

Delphi Developer

Thu, 21 Feb 2002 03:00:00 GMT

Re:Pen instead of Brush.

Quote

Davinci Jeremie wrote in message <7qoh9p$i...@forums.borland.com>...
>How can I create a filled rectangle with a pen style and mode right now I
do
>this...

> Canvas.Pen.Color := Color;
> Canvas.Pen.Style := psSolid;
> Canvas.Pen.Mode := pmMask;
> Canvas.Pen.Width := 1;
> for j := BorderWidth to Height-BorderWidth do // Iterate
> begin
> Canvas.MoveTo(BorderWidth,j);
> Canvas.LineTo(Width-BorderWidth,j);
> end; // for

>Is there a more efficient way of do this?

>Please note that I want to use the pen and not the brush to accomplish this
>as the pen mode is set to a mode I want to use. So using FillRect and
>Rectangle methods of Canvas object will not work as it uses the Brush to
>fill the inside part of the rectangle.

>Davinci

Why not try create your favoriated brush style to fill rectangle?

Davinci Jeremi

Delphi Developer

Sat, 23 Feb 2002 03:00:00 GMT

Re:Pen instead of Brush.

I don't understand what do you mean by "favoriated brush style"?

Quote

ewpsi wrote in message <7qsh6i$lt...@forums.borland.com>...

>Why not try create your favoriated brush style to fill rectangle?

Other Threads

1. Pattern brushes/pens that behave like hatch brushes/pens

2. help: changing pen/brush in paint proc

3. Pen and brush colours

4. Of Palettes, Brushes, Pens and things.

5. Brush/Pen Style setting dialog?

6. graphics API questions (brushes, pens)

7. Saving Font / Brush / Pen to Config File

8. pen/brush assign

9. Rectangle with Pen and Brush

10. Brush.Style - Brush.Color