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

[Hador]

Zitat von Tormentor32:

Delphi-Quellcode:

begin
  if a = b
    then
      begin
      end
    else
  if x = y
    then
      for c := d to e do
        begin
        end
    else
      begin
      end
end;

Das finde ich persönlich völlig unübersichtlich.
Zugegeben in diesem Beispiel ist es nich ok - aber wenn man sich vorstellt, dass sagen wir mal 3 if-Statements und 2 Schleifen ineinander verschachtelt wären, würde das ganze riesig werden.

Ich halte mich - bis auf eine Außnahme - an den Borland Styleguide:

Delphi-Quellcode:

procedure Foo;
var
  F: TFoo;
begin
  if <Bedingung> then 
    Tuwas;

  if <Bedingung> then 
  begin
    Tuwas;
    TuNochwas;
  end;

  if <Bedingung> then 
  begin
    Tuwas;
    TuNochwas;
  end else begin  // Die Abweichung vom Styleguide
    Tuwas;
    TuNochwas;
  end;

  for i:=0 to 100 do
    Tuwas;

  for i:=0 to 100 do
  begin
    Tuwas;
    TuNochwas;
  end;

  //Und so weiter
end;