Hat jemand eine Idee, welche Einstellung bzw. Kombination von Einstellungen, es verursachen könnte, dass mein Formatter in XE7 für einzeilige if-Anweisungen vier Leerzeichen anstatt zwei erzeugt?
Wenn die folgenden Anweisungen mit begin-end; eingeschlossen sind, ist alles wie gewünscht.

markieren

Delphi-Quellcode:

// so ist es zur Zeit
if x = 0 then
    Foo
else
    Bar;

markieren

Delphi-Quellcode:

// so hätte ich es gerne (wieder)
if x = 0 then
  Foo
else
  Bar;

Dein gewünschtes Verhalten ist eigentlich das Standardverhalten. Hast du irgendwas verstellt?

Du kannst ja die aktuellen Einstellungen mal als Profil speichern und dann die Einstellungen zurücksetzen.

In meinem XE3 (Neuinstallation ohne Änderungen) wird es korrekt eingerückt.

zusammenfalten · markieren

Delphi-Quellcode:

begin
  if x = 0 then
    Foo
  else
    Bar;
  begin
    if x = 0 then
      Foo
    else
      Bar;
  end;

Kann man die Ident-Tiefe nicht einstellen? Oder wird vielleicht mit Tab statt Spaces eingerückt?

Zitat von Dejan Vu:

Kann man die Ident-Tiefe nicht einstellen? Oder wird vielleicht mit Tab statt Spaces eingerückt?

Ja, das ist der Wert, den man unter Tools - Optionen - Umgebungsoptionen - Editor-Optionen - Quelloptionen angibt.

Ich vermute auch, daß eine Einstellung abweichend vom Standard die Ursache ist.

Ja, ich hatte den Formatter etwas mehr an meine Vorstellungen angepasst.
Die Idee von Uwe war zielführend. Ich habe mein aktuelles Profil gespeichert und mit der Default-Config verglichen.
Ich konnte das Problem auf die folgende Option zurückführen:

markieren

Code:

Tools -> Options -> Formatter -> Delphi -> Line breaks -> Insert line breaks for Begin and Single instructions -> Line breaks before single instructions in control statements

Diese muss auf "Yes" stehen bleiben (Standard), bei "No" oder "As is" kommt es zu dem oben gezeigten Verhalten.

Was aber ein bisschen schade ist, denn dadurch wird folgendes:

markieren

Delphi-Quellcode:

  case BiDiMode of
    bdLeftToRight : BiDiMode := bdLeftToRight;
    bdRightToLeft : BiDiMode := bdLeftToRight;
    bdRightToLeftNoAlign : BiDiMode := bdLeftToRight;
  else
    LMsg := 'Hello';
  end;

zu sowas:

markieren

Delphi-Quellcode:

  case BiDiMode of
    bdLeftToRight :
    BiDiMode := bdLeftToRight;
    bdRightToLeft :
    BiDiMode := bdLeftToRight;
    bdRightToLeftNoAlign :
    BiDiMode := bdLeftToRight;
  else
  LMsg := 'Hello';
  end;

Ja, ich weiß...eigentlich ein Luxusproblem.

Also bei mir sieht das so aus:

markieren

Delphi-Quellcode:

  case BiDiMode of
    bdLeftToRight:
      BiDiMode := bdLeftToRight;
    bdRightToLeft:
      BiDiMode := bdLeftToRight;
    bdRightToLeftNoAlign:
      BiDiMode := bdLeftToRight;
  else
    LMsg := 'Hello';
  end;

Wenn das jetzt doch nur auf einer Zeile mit des case wäre...

Ich weiß, was du meinst. Leider wird das case-Konstrukt (logischerweise) genauso behandelt, wie die anderen Steueranweisungen. Hier wäre eine Differenzierung wünschenswert.

Eine ähnliche Unschönheit gibt es auch hier: Formatter mangles code in initialization/finalization

Ist es nicht ziemlich wurscht, wie das formatiert ist, Hauptsache immer gleich?