Jan
26
I have made a slight modification to Dial-a-fix so that it works on non-standard (i.e., not 96) "virtual DPI" settings. Windows uses its virtual DPI to scale fonts ("Small fonts" = 96, "Large fonts" = 120) and most programs become unusable because the burden of form scaling lies with the developer. Apparently, with Delphi 7 (and most likely many other versions), the form scaling is just plain broken. Each form's "Scaled" property was set to False, and a quick change was made at the beginning of each form creation procedure to add the ScaleBy function:
Delphi
-
procedure TYourForm.FormCreate(Sender: TObject);
-
begin
-
if Screen.PixelsPerInch <> PixelsPerInch then
-
ScaleBy(Screen.PixelsPerInch, PixelsPerInch);
-
{..the rest of your FormCreate procedure..}
-
end;
I swear I will now begin making the Dial-a-fix tips page :)
Comments
3 Responses to “Dial-a-fix update (no version change)”
Leave a Reply

Dude I have a DAF related question.. But I dont know of a better way to ask you so here it goes. :D
http://forum.ccleaner.com/index.php?showtopic=3914
Does DAF reregister those dlls mentioned? (I see the VB script one mentioned but not the other)
Yeah it registers both DLLs.
Thanks.