Thema: Delphi Savedialog Frage

Einzelnen Beitrag anzeigen

Bastler

Registriert seit: 15. Aug 2006
153 Beiträge
 
Delphi 7 Personal
 
#6

Re: Savedialog Frage

  Alt 4. Aug 2007, 14:22
Nagut, eins ist doppelt, das ist richtig, aber ob man :

Delphi-Quellcode:
procedure TForm1.Button8Click(Sender: TObject);
begin
if OpenDialog1.Execute then
  OpenDialog1.Filename := ListBox3.Items.Add(ExtractFileName(OpenDialog1.FileName));
end;
oder

Delphi-Quellcode:
procedure TForm1.Button8Click(Sender: TObject);
begin
if OpenDialog1.Execute then
  OpenDialog1.Filename := ExtractFileName(OpenDialog1.FileName);
  ListBox3.Items.Add(ExtractFileName(OpenDialog1.FileName));
end;
schreibt ist doch eigentlich egal, da das selbe passiert...
Zwei Dinge sind unendlich, das Universum und die menschliche Dummheit, aber beim Universum bin ich mir noch nicht ganz sicher
(A. Einstein)
  Mit Zitat antworten Zitat