GetCurrentDir - Zurücksetzten

[mirage228]

Hi,

Ich würde so ähnlich machen

Delphi-Quellcode:

var
  CurrDir: String;
begin
  CurrDir := GetCurrentDir();
  if OpenDialog1.Execute then
  begin
    // ...
  end;
  SetCurrentDir(CurrentDir);
end;

mfG
mirage228