Hallo,
um das ganze etwas zu präzisieren.
@Chris
In OpenDialog.FileName, steht nicht einfach nur der Dateiname dirn, sondern der komplette Pfad mit dazu.
Der Open- oder auch SaveDialog, sind einfach gesagt, nur einfach hilfsmittel, an den Pfad einer Datei zu gelangen.
Delphi-Quellcode:
if OpenDialog.Execute then
begin
end;
In den if-Teil, kommt man nur rein, wenn im Dialog der Button OK angeklickt wurde!
Und hier noch ein kleines Beispiel, was man noch so an Daten rausbekommen könnte, anhand des Dialogs.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
ShowMessage('Die Datei ' + ExtractFileName(OpenDialog1.FileName) + ' wurde ausgewählt.' + #13#10 +
'Die Datei liegt im Ordner ' + ExtractFileDir(OpenDialog1.FileName) + #13#10 +
'Der Pfad zur Datei lautet: ' + ExtractFilePath(OpenDialog1.FileName) + #13#10 +
'Die Datei liegt auf folgendem Laufwerk: ' + ExtractFileDrive(OpenDialog1.FileName) + #13#10 +
'Die Datei hat folgende Endung: ' + ExtractFileExt(OpenDialog1.FileName) + #13#10);
end;
end;
Grüsse, Daniel
