Zitat von
Bastler:
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... Bin ich jetzt dumm, oder interessiert sich keiner für den Fall das
.Execute() false zurückliefert (= Abbruch)
In diesem Fall sind die beiden nicht identisch, da bei der unteren Variante das .Add immer ausgeführt wird ...
Desweitern erschließt sich der Sinn hinter
OpenDialog1.Filename := ExtractFileName(OpenDialog1.FileName);
nicht so richtig ...
