if..then..else Konstrukt

[Neutral General]

"Mehr als eine Zeile" ist nicht die exakte Regel die gilt wenn kein begin/end genutzt wird. Genauer ist eine Anweisung ODER ein Block.
In dem Fall steht der gesamte "if SelectedIndex >= 0 then"-Block unter dem ersten if.

Es ist sehr schlecht und unleserlich eingerückt und man sollte gerade wenn es nicht um wirklich nur 1 Anweisung sondern einen ganzen Block geht begin/end nutzen:

Schlecht (so ist es jetzt):

Delphi-Quellcode:

if Selecting then
if SelectedIndex >= 0 then
begin
  ...
end;

Besser:

Delphi-Quellcode:

if Selecting then
  if SelectedIndex >= 0 then
  begin
    ...
  end;

Gut:

Delphi-Quellcode:

if Selecting then
begin
  if SelectedIndex >= 0 then
  begin
    ...
  end;
end;

Alle 3 Versionen funktionieren am Ende gleich.