BorlandTalk.com

Kent · Guest

I am printing a polygon and filling it with a style(Diagonal).
It works fine as long as I print it in color or to the screen.
I want to print it on a black and white laser printer.
Therefore, before printing
the polygon I set both the Pen and Brush to the color black.
If I leave the brush style either bsBDiagonal or bsFDiagonal
the lines appear to draw white. I have a background mesh
that is printed with little holes where the hatches should be.
If I change the style to bsSolid it prints fine. How can I get
the black hatch to show up. Here is the code:

Canvas.Pen.Color := clBlack;
Canvas.Brush.Color := clBlack;
Canvas.Brush.Style := bsBDiagonal; // bsSolid;
Canvas.Polygon(Points);

The above code works fine when the canvas is the screen but
not the laser printer.

Rod · Guest

Kent wrote: