ShutDown Problem

[TeronG]

*push* waren das nun 24h oder 24 Tage pause bis zum pushen

[danku]

habs genauso wie im #4 gemacht aber keine wirkung

nach einem countdown wird ein button automatisch geklickt mit folgendem code:

Delphi-Quellcode:

//case mag ich nicht so ;)
if lboff.itemindex=0
  then ExWindows('', ewx_poweroff)       //Beenden
    else if lboff.itemindex=1
     then ExWindows('', ewx_reboot )     //Neustart
      else if lboff.itemindex=2
       then ExWindows('', ewx_logoff );  //Logoff
end;

was ist daran falsch?

[Luckie]

Zitat von danku:

case mag ich nicht so

Solltest du aber:

Delphi-Quellcode:

case lboff.itemindex of
0: ExWindows('', ewx_poweroff);
1: ExWindows('', ewx_reboot );
2: ExWindows('', ewx_logoff );
end;

Was kann man daran bitte jetzt nicht mögen?

BTW debugg das mal und guck, ob er überhaupt in den entsprechenden Zweig (if/case) reinspringt.

[danku]

ich weiß so hatte ich es auch schon aber ist nicht eine if-anweisung schöner?
verschachtelt ohne ende. case geht schon..

[pacman1986]

Zitat von danku:

ich weiß so hatte ich es auch schon aber ist nicht eine if-anweisung schöner?
verschachtelt ohne ende. case geht schon..

das nenne ich mal hardcoden

[danku]

Back to the topic please.
warum funzt die case nicht.
wäre eine ShellExecute besser?

[ManuMF]

Hallo,

weil du in Zeile 533 ein "end" vergessen hast.

Nein, kleiner Scherz. Schreib doch mal, was daran nicht funktioniert, sonst ist dir nicht zu helfen

Gruß,
ManuMF

[danku]

hab mir selber geholfen
es gab ein problem mit der tlistbox.
irgendwie verstand der nicht .itemindex.
die gleiche methode bei einer tcombobox funzt einwandfrei.

[Luckie]

Zitat von danku:

ich weiß so hatte ich es auch schon aber ist nicht eine if-anweisung schöner?
verschachtelt ohne ende. case geht schon..

Na wenn dir eine ohne Ende verschachtelte if-Abfgare leiber ist, wo man nach zwei Minuten scho nnicht mehr durchblickt und schon gar nicht nur vom draufgucken, dann bitte.