[DUG] Screen resolution.

[Mike Meyer]

Hi Wallace,

I place this snippet on all my screens (form create) to assist with 
different resolutions.

Seems to work well.  Need to set the scaled property to 'False'.

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


Hope this helps

Mike



-----Original Message----- 
From: Marshland Engineering
Sent: Sunday, July 08, 2012 9:21 PM
To: delphi at listserver.123.net.nz
Subject: [DUG] Screen resolution.

After sending a few hours on getting ScaleBy working and the apps automating
re-scaling the form when running on a much lower resolution screen, I then
found it was all futile if  DBGrids are on the form. The forms then end up
any unpredictable size.

Ok my design screen is 1400 x 1050. I made the form a nice 1280 x 1024. When
running on a 1024x600 netbook, the form was something like 820x650 and the
pages wern't good at all.

I tried Perfectsize which works but before the app finally displays
correctly, the main form looks like jelly for a few seconds. Possbly it
redraws the form after each compent conversion and there are a lot of
components to scale.

I tried  EasySize but it crashed and looked for extra pas files that are
nowhere to be found.

I'm not looking to rescale the form as such but be able to show it correctly
on various monitors. However, it appears that correcting the Hubble
telescope mirror may be a bit easier to do. Any suggestions ?

Thanks Wallace


_______________________________________________
NZ Borland Developers Group - Delphi mailing list
Post: delphi at listserver.123.net.nz
Admin: http://delphi.org.nz/mailman/listinfo/delphi
Unsubscribe: send an email to delphi-request at listserver.123.net.nz with 
Subject: unsubscribe