![]() |
![]() ![]() ![]() |
acFormPlacementSaver component.
|
type
|
TacFormPlacementSaverEvent = procedure(Sender: TObject; Reg: TRegistry) of object;
|
|
property OnSaveSettings: TacFormPlacementSaverEvent;
|
The OnSaveSettings occurs when the component stores the information about form placement to the system registry. Write OnSaveSettings event handler to store some additional settings together with form placement.
|
procedure TMainForm.PlacementSaver1SaveSettings(Sender: TObject;
|
Reg: TRegistry);
|
begin
|
Reg.WriteInteger('Test', 1);
|
end;
|
OnLoadSettings and OnRegKeyNotFound events.
|