Hallo Sharky, hallo
DP'ler,
wir bzw ich habe eine Lösung, basierend auf dem Vorschlag von Sharky, gefunden.
Mein Beispielcode besteht aus 2 Forms. Auf der ersten Form sind die Sicherungsroutinen untergbracht, die 2. wird gesichert.
Achtung auf der zweiten Form dürfen nur Komponenten vorkommen die ein Property "Text" besitzen. (Ist ein Fehler der noch beseitigt wird). Als Stack wird eine Tstringlist verwendet.
Zum Beispielcode:
PUSH - Sichern der Form (Inhalte)
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if s=nil then s:=tstringlist.create;
Push(s,form2);
end;
POP - Rückholen der Form (Inhalte)
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
begin
Pop(s,form2);
s.clear;
end;
Die Stringlist "s" muss natürlich noch mit create erzeugt werden. Das gleiche gilt für das verlassen des Programms mit free.
Endgültiges Ziel meiner Arbeit ist es eine fertige Komponente zu erstellen und diese dann hier zu veröffentlichen.
Grüsse
Rainer