Brauche Hilfe mit Messagebox

[Der schöne Günther]

Zitat:

Zitat von DeddyH (Beitrag 1206937)

Das ist aber jetzt doppelt gemoppelt. Bei entsprechender Logik brauchst Du kein Exit, wenn Du Exit verwendest, brauchst Du keinen Else-Zweig :gruebel:

Bei Marsrovern wird für erhöhte Ausfallsicherheit auch redundant gebaut.

[Natcree]

stimmt hast recht. den setfocus auf edit hat er nicht gemacht. kahm fehler meldung

[DeddyH]

[ironie] Ich schreibe ja auch immer als letzte Zeile jeder Methode noch ein Exit rein, damit ich sicher bin, dass die Methode auch verlassen wird. [/ironie]

[p80286]

Zitat:

Zitat von Natcree (Beitrag 1206934)

Delphi-Quellcode:

  
if edit3.Text = '' then
     begin
     if MessageBox(0, 'Eingabe erwartet', 'Fehler', MB_OK or MB_ICONERROR)= idok then exit 
else

...
end;

Zitat:

Zitat von DeddyH (Beitrag 1206937)

Das ist aber jetzt doppelt gemoppelt. Bei entsprechender Logik brauchst Du kein Exit, wenn Du Exit verwendest, brauchst Du keinen Else-Zweig :gruebel:

Da nach dem else kein

Delphi-Quellcode:

begin..end

folgt, ist das

Delphi-Quellcode:

exit

durchaus notwendig, da sonst alle Anweisungen nach

Delphi-Quellcode:

else ...;

ausgefürt werden.

:idea:

Gruß
K-H

[DeddyH]

"Bei entsprechender Logik" hab ich ja nicht umsonst geschrieben. Außerdem bezieht sich das else im gezeigten Code auf die Rückgabe der MessageBox, was ja hier gar keinen rechten Sinn macht.

[p80286]

Zitat:

Zitat von DeddyH (Beitrag 1206967)

"Bei entsprechender Logik"

:stupid:Grauslig ich hab ja noch mehr übersehen:stupid:

Gruß
K-H