Frage zum OpenDialog

[scp]

Nimm Form1.Handle oder mach einen zweiten Parameter:

Delphi-Quellcode:

function ChooseFolder(Handle : hwnd; const Title: string): string;

// ...

//Aufgerufen wird dat dann mit:
procedure TMainForm.btnOpenPathClick(Sender: TObject);
var
  dir: String;

begin
  dir := ChooseFolder(Handle, 'Verzeichnis zum Speichern auswählen:');
  //Hier dann dir auswerten ne
end;