Class TFormSettings (unit FormSettings)

Inherits from

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;

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;



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;