dateinamen merken zum speichern

[tigerman33]

Genau so wie es da steht.

TheFilename ist ein String, in dem du den Dateinamen gespeichert hast. Aufpassen: Das darf keine lokale Variable sein, denn deren Speicher würde nach Verlassen der Prozedur/Funktion wieder freigegeben werden. Mit dem @-Operator greifst du auf die Speicheradresse dieses Strings zu. Da das ein 4-Byte cardinal ist, kannst du den ohne Probleme der Tag-property des Tabpage zuweisen. Fällt mir gerade auf: Oben hab ich einen Fehler gemacht. Darf natürlich nicht PageControl1.Tag sein, sonder Tabpage1.Tag (oder wie die pages auch immer heißen).

Zuweisen:
Tabpage1.Tag := @TheFilename; Auslesen:

Delphi-Quellcode:

type TPString = ^string;
var s: string;
begin
...
if Tabpage1.Tag <> 0 then // entspricht nil
  s := TPString(Tabpage1.Tag)^;
...
end;