No difference. As the help states you simply get the default, which in this
case(arial narrow) is variable. Unless someone knows a better way I've found
my best fit with
  Printer.Canvas.font.name := 'Courier';
  Printer.Canvas.font.size = 8;
  Printer.Canvas.Font.Pitch := fpFixed;
(at least I can now just squeeze 164 chars onto one line(portrait))

-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
Behalf Of Mason, John
Sent: Tuesday, September 05, 2000 11:00 AM
To: Multiple recipients of list delphi
Subject: Re: [DUG]: Printing proportionally


Arial Narrow is a variable pitch font. According the the on-line help
setting
the pitch of a variable pitch font to fpFixed will cause Windows to
substitute
the nearest fixed pitch font. What happens if you set the pitch to
fpDefault?
Alan Rose wrote:

> 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"

--
John Mason
Sinclair Knight Merz Limited



---------------------------------------------------------------------------
    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"

---------------------------------------------------------------------------
    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"

Reply via email to