|
(Co-Admin)
Registriert seit: 29. Mai 2002
Ort: Hamburg
11.117 Beiträge
Delphi 11 Alexandria
|
Re: Problem mit nem OpenDialog ^^
7. Sep 2003, 01:20
Moin Kochfolie,
Delphi-Quellcode:
dateiname:='xyz123987zyx5321abgebrochenblubblub';
if open.execute then dateiname:=extractfilename(Open.Filename);
if dateiname<>'xyz123987zyx5321abgebrochenblubblub' then begin
und warum nicht, in Anlehnung an Marcos Vorschlag so:
Delphi-Quellcode:
if not open.execute then exit;
dateiname:=extractfilename(Open.Filename);
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
|