Überraschendes Verhalten im if-else if-Konstrukt

[DieDolly]

Code ordentlich formatieren dann sieht man sowas auch sofort

Delphi-Quellcode:

 if Form1.Caption = 'ksjhdgk' then
  ShowMessage('1')
 else if Form1.Caption = 'fgjfstj' then
  // eigentlich ja auch eine Anweisung
  if Button1.Caption = 'Button1' then
   ShowMessage('2')
  else if Form1.Caption = 'Form1' then
   ShowMessage('3');

Oder mit 2 Leerstellen ist es noch besser sichtbar

Delphi-Quellcode:

 if Form1.Caption = 'ksjhdgk' then
   ShowMessage('1')
 else if Form1.Caption = 'fgjfstj' then
   // eigentlich ja auch eine Anweisung
   if Button1.Caption = 'Button1' then
     ShowMessage('2')
   else if Form1.Caption = 'Form1' then
     ShowMessage('3');

Und so ist es am besten lesbar finde ich und weniger anfällig für Fehler

Delphi-Quellcode:

 if Form1.Caption = 'ksjhdgk' then
  begin
   ShowMessage('1');
  end
 else if Form1.Caption = 'fgjfstj' then
  begin
   // eigentlich ja auch eine Anweisung
   if Button1.Caption = 'Button1' then
    begin
     ShowMessage('2');
    end
   else if Form1.Caption = 'Form1' then
    begin
     ShowMessage('3');
    end;
  end;

Entweder selber ordentlich und richtig formatieren oder STRG+D benutzen.