Registriert seit: 22. Mär 2003
Ort: Finsterwalde
622 Beiträge
Turbo Delphi für Win32
|
Positionen aller Forms wiederherstellen
13. Jan 2010, 00:08
Hallo,
ich habe ein Programm bestehend aus mehreren Forms. Die Position der Hauptform (Top, Left, Height, Width) speichere ich beim Beenden in der Registry und lade sie bei einem Neustart. Die Positionen der SubForms kann ich auch speichern. Es hapert aber am Wiederherstellen. Da das Ereignis OnCreate() des MainForm vor dem aller anderen Forms ausgeführt wird und diese noch nicht angelegt sind, geht es dort nicht.
Ich hatte dann die Idee, die Create-Reihenfolge zu ändern, so dass alle Fenster angelegt sind, wenn das MainForm schließlich angelegt wird. Aber leider ist Application.MainForm nur ReadOnly, so dass auch das nicht geht.
In einem früheren Programm hatte ich das so "gelöst", dass ich mir die Positionen beim Schließen der Fenster immer merkte und vor jedem neuen Anzeigen wieder setzte; das ist aber sehr umständlich.
Gibt es andere Möglichkeiten?
Gruß und danke für Ideen, Alex
Alex Winzer
|