Zitat von
BullsEye:
Delphi-Quellcode:
IF ListBox1.ItemIndex <= -1 THEN BEGIN
btnOeffnen.click;
Abspielen;
END ELSE BEGIN
Abspielen;
END;
Code gerade ausm Kopf
man will ja nicht kleinlich sein, aber:
http://www.delphi-treff.de/delphi-styleguide/
außerdem wurde ich nur verschachteln, wenn es unbegint sein muss. nicht formatiert kann das furchtbar unleserlich werden.
Delphi-Quellcode:
if ListBox1.ItemIndex <= -1 then
Dialog();
Abspielen();
das entspricht deinem snippet, denn bei
Delphi-Quellcode:
if exp then
miep() else
miep()
wird immer miep() aufgerufen.
sinnvoll waere folgendes:
Delphi-Quellcode:
if ListBox1.ItemIndex <= -1 then
Dialog();
if ListBox1.ItemIndex <= -1 then
Abpielen();
imho muss es ja nicht sein, das eine datei tatsaechlich hinzugefuegt wird bzw. existiert. so wird sichergestellt, das auch nur abgespielt wird, wenn auch was da ist.