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

[Micha88]

Ich persönlich rücke in "Einser-Schritten" ein.

Also sehr gerne so:

Delphi-Quellcode:

procedure Button1.Click(Sender: TOBject);
begin
-if 1 > 0 then // Leerzeichen rechts und links von >
--begin
---// Do something
--end;
-Label1.Caption := 'Mich gibbet net!' // Label auf selbe Höhe wie "if"
end;

Die schlimmste Formatierung die ich je gesehen habe sah in etwa so aus:

Delphi-Quellcode:

procedure Button1.Click(Sender: TOBject);
--begin
-----if 1 > 0 then // Leerzeichen rechts und links von 
-----begin
-----// Do something
-----end;
-----Label1.Caption := 'Mich gibbet net!' // Label auf selbe Höhe wie "if"
--end;