Simon:

Try setting...

     Printer.Canvas.Brush.Style := bsClear;