| Class TFormSettings (unit FormSettings) |
TComponent
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure LoadSettings;
procedure SaveSettings;
procedure DoLoadValues(reg: TRegIniFile);
procedure DoSaveValues(reg: TRegIniFile);
function GetKeyName: string;
procedure Loaded;
procedure Notification(AComponent: TComponent; Operation: TOperation);
procedure ReadFont(Name: string; f: TFont; reg: TRegIniFile);
function StrToWS(const s: string): TWindowState;
procedure WriteFont(Name: string; f: TFont; reg: TRegIniFile);
function WSToStr(ws: TWindowState): string;| Properties |
property KeyName : string
property LoadValues : boolean
property RootControl : TWinControl
property SavePosition : boolean
property SaveValueOptions : TSaveValSet
property SaveValues : boolean| Events |
| Variables |
DidLastSave : boolean;
FKeyName : string;
FLoadVals : boolean;
FRootCon : TWinControl;
FSaveOpt : TSaveValSet;
FSavePos : boolean;
FSaveVals : boolean;| Constructors |
constructor Create(AOwner: TComponent);| Functions |
destructor Destroy;
procedure LoadSettings;
procedure SaveSettings;
procedure DoLoadValues(reg: TRegIniFile);
procedure DoSaveValues(reg: TRegIniFile);
function GetKeyName: string;
procedure Loaded;This still doesn't work! All the window handles are gone! -bpz SaveSettings;
procedure Notification(AComponent: TComponent; Operation: TOperation);
procedure ReadFont(Name: string; f: TFont; reg: TRegIniFile);
function StrToWS(const s: string): TWindowState;
procedure WriteFont(Name: string; f: TFont; reg: TRegIniFile);
function WSToStr(ws: TWindowState): string;| Properties |
property KeyName : string
property LoadValues : boolean
property RootControl : TWinControl
property SavePosition : boolean
property SaveValueOptions : TSaveValSet
property SaveValues : boolean| Events |
| Variables |
DidLastSave : boolean;
FKeyName : string;
FLoadVals : boolean;
FRootCon : TWinControl;
FSaveOpt : TSaveValSet;
FSavePos : boolean;
FSaveVals : boolean;