Einrücken ::: ::: Wie rückt ihr ein?

[Tyrael Y.]

Zitat von Prototypjack:

Delphi-Quellcode:

procedure ButtonClick(Sender: TObject);
begin
  if A < B then
  begin
    Label1.Caption := 'Foo';
  end;
  for I := 0 to SomeList.Count - 1 do
  begin
    if I > A then
    begin
      Label1.Caption := 'Bar';
    end;
  end;
end;

Genauso sieht bei mir auch der Code aus.
Bin halt konsequent in setzen von begin end.
Bei Erweiterungen des Codes kann man sich auch nicht vertun bzw. etwas übersehen.