Ich habe mal ein kleines Beispiel zum Schreiben der Edits erstellt.
Vielleicht kannst Du damit ja was anfangen und daraus eine prozedure zum Einlesen herleiten? In diesem Beispiel siehst Du wie man die Edit-Daten lef und top in eine Ini schreibt und das ganze einfach beim Beenden des Programmes aufruft. Du müsstest nun eine Routine zum Laden schreiben und diese onActivate einbinden.
Delphi-Quellcode:
uses
IniFiles; //wird benötigt zum schreiben von ini´s
var
App_Pfad:String; //globale Variable
procedure TForm1.FormCreate(Sender: TObject);
begin
App_Pfad:=ExtractFileDir(Application.ExeName);
if not(AnsiLastChar(App_Pfad)='\') then App_Pfad:=App_Pfad+'\';
end;
procedure TForm1.SaveEdits;
var
ini:TIniFile;
i:integer;
begin
ini:=TIniFile.Create(App_Pfad+'settings.ini');
for i:=0 to ComponentCount-1 do
begin
if (Components[i] is TEdit) then
begin
ini.WriteInteger(Components[i].Name,'left',(Components[i] as TEdit).Left);
ini.WriteInteger(Components[i].Name,'top',(Components[i] as TEdit).Top);
end;
end;
end;
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
SaveEdits;
end;
Viel Spass damit