Registriert seit: 19. Jul 2004
Ort: München
960 Beiträge
Delphi 2007 Professional
|
Re: Datei prüfen
14. Mai 2008, 15:15
*HinKlatsch* ^^
Delphi-Quellcode:
if OpenDialog1.Execute then //nur wenn true also existierende Datei ausgewählt wurde wir Rest ausgeführt
begin
Edit1.Text :=(OpenDialog1.Filename);
dateiname :=ExtractFileName(edit1.text);
endung :=ExtractFileExt(edit1.text);
end;
龍 Der Unterschied zwischen Theorie und Praxis ist in der Praxis größer als in der Theorie.
|