Hi, I need help printing proportionally.
Ive had success with fonts like "courier new" etc, but I found the letter
spacing was too wide to fit the content on the page. Ideally the "Arial
Narrow" font would do, but this doesnt work even with pitch set to fpFixed.
Is there a better way to do this with any font. Thanks in advance.
if chkLandscape.checked then
Printer.Orientation := poLandscape
else
Printer.Orientation := poPortrait;
AssignPrn(MyPrt);
Rewrite(MyPrt);
Printer.Canvas.font.size := 9;
// Printer.Canvas.font.name := 'Courier';
Printer.Canvas.font.name := 'Arial Narrow';
// Printer.Canvas.font.name := 'Lucida Sans Typewriter';
Printer.Canvas.Font.Pitch := fpFixed;
Writeln(MyPrt, mmReports.Text);
System.CloseFile(MyPrt);
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
To UnSub, send email to: [EMAIL PROTECTED]
with body of "unsubscribe delphi"
