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

[Prototypjack]

Moin,
Grundsätzlich halte ich mich an den Borland Styleguide.
Jedoch mache ich gewisse Dinge ein bisschen anders (Aber auch Styleguide-Legitim).
Wie zum Beispiel verwende ich IMMER wo ein Begin-Block möglich ist, selbigen.

Delphi-Quellcode:

procedure ButtonClick(Sender: Tbject);
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;