TRePosApp -
Register -
DefHeight
DefHeightName
DefIniFileName
DefLeft
DefLeftName
DefSectionName
DefTop
DefTopName
DefWidth
DefWidthName
DefWindowStateName
procedure Register;
DefHeight = 300
DefHeightName = 'Height'
DefIniFileName = 'MyApp'
DefLeft = 100
DefLeftName = 'Left'
DefSectionName = 'Dimensions'
DefTop = 100
Saves & Restores a form's position to and from an ini file
Gives full control of inifile name, section heading, and names of variables,
as well as default values. The inifile will be created if it doesn't exist
two Methods: 1) LoadAppPosition - Load values from ini and applies to form
2) SaveAppPosition - Save Current Values to infile
LoadAppPosition should be placed in formshow, not formcreate and
SaveAppPosition can be placed anywhere, onclose works fine
Freeware Use & Abuse
Author: Edward de la Rey
edwardr@mailbox.ru.ac.za
USE AT OWN RISK
For Delphi 1,2,3 Will Automatically pickup the correct DCR File,
D16 is for Delphi1, D32 for Delphi 2&3, Don't rename them.
DefTopName = 'Top'
DefWidth = 300
DefWidthName = 'Width'
DefWindowStateName = 'MyWindowState'