Pfad in einem Editfeld ausgeben

[s-off]

Hallo,

Delphi-Quellcode:

   If OpenDialog1.Execute then
      Edit1.Text := ExtractFilePath(OpenDialog1.FileName);