Moin 1PM,
Zitat von
1PM:
Gibt es ein Tut. dazu?
Reicht das so:
Delphi-Quellcode:
var
sPath : string;
begin
OpenDialog1.Filename := 'c:\irgendein Pfad\Dummy.datei';
if not OpenDialog1.Execute then exit;
sPath := ExtractFilepath(OpenDialog1.Filename);
end;
Die Option FileMustExist muss dabei natürlich ausgeschaltet sein.
Ich frag' mich allerdings, was Du damit vorhast, denn es ist, genaugenommen, eine unschöne "Bastellösung".