Dealing with Large Fonts in D7

Please discuss general Delphi programming topics here.

Dealing with Large Fonts in D7

Postby jvoelker » March 6th, 2009, 10:59 am

What is the best way to handle Large Fonts in D7 so that your forms are displayed correctly regardless of the font size used?

I have found two basic approaches

1.
procedure TForm1.FormCreate(Sender: TObject);
begin
Assert(not Scaled, 'TForm.Scaled property sucks, you should set it to False!');
if Screen.PixelsPerInch <> PixelsPerInch then
begin
ScaleBy(Screen.PixelsPerInch, PixelsPerInch);
end;
end;

2.
Set form.scaled := true
Set form.autoscroll := false;

Any advice is greatly appreciated.

Jim Voelker
jvoelker
Active Member
Active Member
 
Posts: 9
Joined: December 1st, 2006, 10:57 pm

Return to Delphi Programming

Who is online

Users browsing this forum: Bing [Bot] and 2 guests

cron