TIP: Click on subject to list as thread! ANSI
echo: delphi
to: STEVE BATSON
from: PAT PRIDGEN
date: 1997-08-18 19:02:00
subject: Screen Resolutions

[ In a message from Steve Batson to Jud Mccranie ]
 -> No, I haven't tried them.  These are 3rd party, I assume?
 SB> There is one, I think it was called GTSizer. It is supposed to do
 SB> everything including fonts if I remember correctly. I haven't bought
    I've found a Component that is pretty handy. It has helped me to let
a friend who uses one of my programs use it in 1024x768 Resolution. To
make sure that Fonts don't get messed up, be sure and use a TTFont ie.
Arial. I can't remember exactly where I found it, but...I started on the
Delphi Super Page. Here's the info from a Small text file that was
included.
___-------------------------------------------------------------------
Scaler object
This object scales in run-time the form that it is placed on, based
on the current setting of the screen resolution.
The current screen resolution in design time is placed in the properties
'Xdevelop' and 'Ydevelop'. These variables can be overridden to observe
the behavior of the form at different resolutions.
Important things to keep in mind:
Use scaleable fonts like Arial or MS sans serif
Set the Autosize properties of visible objects to true (the default)
Set the Scaled property of the form to true (the default)
Each form that must be scaleable should contain the TScaler object.
The TScaler object is scaling the form by observing:
Screen resolution.
Setting of the Windows Font size (=> PixelsPerInch property).
Settings of Windows caption and border sizes.
Presence of a menu bar.
Installation
Copy the files SCALER.DCU and SCALER.DCR to a library directory of
your choice.
Choose from within the Delphi menu bar Options, Install components,
Add and select the SCALER.DCU file. Click OK and OK.
The component is now installed in the Additional panel.
Use of the Scaler component
After designing a form, just place the object somewhere on the form,
that's all.
If the scaling should only occur when the screen resolution is less
then the screen resolution at design time, set the property LimitScale
to NoDownScale. If upscaling is prohibited, then set this property
to NoUpscale. If no scaling at all is wanted, you can set LimitScale
to ScaleNever (probably you will prefer removing the component, but
this allows the user to configure scaling behavior at run time).
Just before scaling is performed, an event OnScale is generated. This
event allows the user to decide at run time whether the scaling should
be performed.
Scaler is also capable to respond to changes in screen size at run
time. To enable this feature, set the property ScaleRuntime to True.
Properties
Xdevelop   The screen width at design time.
Ydevelop   The screen height at design time.
LimitScale  Limit scaling to upscale or downscale.
ScaleRuntime  Set to true if run time resizing is wanted.
Generally the first 6 properties will not be modified manually. An
exception can be made for the Xdevelop property. If the form is designed
at i.e. 800x600, changing this property to 1000 (=800*(800/640)) will
show the form as it appears at a resolution of 640x480.
Events
OnScale(Upwards: Boolean; var CancelScaling: Boolean);
Upwards defines if the form will be rescaled upwards. If scaling is
not required, then set CancelScaling to true.
Registration
The use of this object is free. Registered users receive a copy of
the source. Registration can be done at SWREG (id=9076, fee is $10
+ $2 shipping). Registered users will receive updated versions when
available.
Other products:
Lookup ComboBox. The missing combo in the standard Delphi panel. Lookup
rows from a TTable or Tquery (LOOKUPDB.ZIP.
Master-detail combobox. Supports real master-detail related lookup
tables. Also supports TQuery as Lookupsource (MDCOMBO.ZIP).
Herman Steigstra, CompuServe 100637,1276
.               Pat, La Grande, OR. 
.                      http://www.ixc.net/~ppridgen
*SignIt 2.0 #001* 
... I don't want to be literate, I just want to program!
___ Blue Wave/DOS v2.30
--- Maximus 2.02
---------------
* Origin: THE LOFT in Auburn IN 219-925-5524 & 238-3222 HST/V34+ (1:236/7)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.