Auf welches IF (bei mehreren IFs) bezieht sich ein ELSE?

[Alallart]

Gibt es da eine Regel oder ist das eine Einstellungssache? Ein Beispiel

Delphi-Quellcode:

var
  a: Integer;
begin
  Randomize;
  a := Random(3); //Ergibt eine Zahl zwischen 0 und 2

  if a > 0 then
    if a = 1 then
      ShowMessage('a ist 1')
    else
      ShowMessage('a ist 2');
end;

Wenn ich das teste, bezieht sich ELSE bei mir auf das zweite IF. Die Frage die ich mir stelle ist allerdings - ist das eine Einstellungssache oder bezieht sich ELSE immer auf das letzte IF? Kann man drauf vertrauen?

[Schokohase]

Ja, ist so, trotzdem würde ich da mit

Delphi-Quellcode:

begin ... end

arbeiten um das deutlicher hervorzuheben. Source ist nicht nur für den Compiler sondern auch für den Entwickler und die Kollegen.

[p80286]

Ein else bezieht sich auf das jeweils letzte If, das keinen else-Zweig besitzt.
Wenn man nicht selbs mit begin..end strukturiert.

Gruß
K-H

[DP-Maintenance]

Dieses Thema wurde am "13. Jan 2019, 15:19 Uhr" von "Luckie" aus dem Forum "Programmieren allgemein" in das Forum "Object-Pascal / Delphi-Language" verschoben.

[Redeemer]

Nimm CnPack, klick auf der "else" und er zeigt dir das if.

[Moombas]

Tipp: Mache nach deinem If-Then ein begin-end, dann weisst du in der Regel wo das else auch zugehört. Ist aber auch ein wenig Geschmackssache aber ich finde das erleichtert vieles in der Lesbarkeit.

Delphi-Quellcode:

if a > 0 then
begin
   if a = 1 then
   begin
     ShowMessage('a ist 1');
   end else
   begin
     ShowMessage('a ist 2');
   end;
end;

Tipp2: Bei deinem Beispiel würde sich eine Case-Anweisung aus meiner Sicht besser eignen:

Delphi-Quellcode:

Case a of
       1 : ShowMessage('a ist 1');
       2 : ShowMessage('a ist 2');
//else                              //optional
//       ShowMessage('a ist ' + inttostr(a)); //optional
end;

Oder wenn es dir wirklich nur um die Ausgabe des Wertes geht:

Delphi-Quellcode:

if a > 0 then
begin
  ShowMessage('a ist ' + inttostr(a));
end;

[mkinzler]

Zitat:

if a > 0 then
begin
ShowMessage('a ist ' + a);
end;

Wird einen Fehler liefern

Delphi-Quellcode:

ShowMessage('a ist ', IntToStr(a));

oder mit Format().

[Moombas]

Habs schon bemerkt gehabt und korrigiert ;) SO ist das wenn man nur mal eben schnell was hin zimmert im Browser XD