Scalabium Software

SMExport advertising
Knowledge for your independence'.
Home Delphi and C++Builder tips

#22: quick printing with TPrinter type using default resident font (part 1)

Sometimes for quick printing on the printer canvas I load a default resident font and draw on the canvas using it.

View a small example:

uses Printers;

procedure TForm1.Button1Click(Sender: TObject);
    Printer.Canvas.Font.Handle := GetStockObject(DEVICE_DEFAULT_FONT);
    Printer.Canvas.TextOut(100,  50, 'Text string1');
    Printer.Canvas.TextOut(100, 150, 'Text string2');

Published: September 22, 1999

See also
Paradox to MS Access converter
Word Web-stream
ABA Database Convert
Clarion to Text converter
Protected Storage Viewer
ExcelFile Viewer
SMExport suite
Clarion Viewer
ABA Picture Convert
Paradox Viewer

Contact to webmaster


Borland Software Code Gear Scalabium Delphi tips

Copyright© 1998-2019, Scalabium Software. All rights reserved.

SMExport advertising