Source Formatter, der folgendes kann gesucht

[RSE]

Hallo,

ich möchte gern einen Source Formatter einsetzen. Der in Delphi XE mitgelieferte hat allerdings keine weiteren Optionen zur Einrückung bei (weil länger 80 Zeichen) umgebrochenen Zeilen. Ich möchte, dass folgender Quellcode zumindest so bleibt, wenn der Formatter drübergeht:

Delphi-Quellcode:

if (MyIntegerVarWithVeryExtendedTooLongName = 
    MyOtherIntegerVarWithVeryExtendedTooLongName) and
   (SomeOtherVar > SomeIntegerVar) and
   ((IntVar > IntConst1) or
    (IntVar > IntConst2) or
    (IntVar > IntConst3) or
    (IntVar > IntConst4)) then
  AnweisungMitSehrLangemNamen(ArgumentMitSehrLangemNamen,
    ZweitesArgument);

Genauer gesagt steht in unserem Styleguide u.a. folgendes:

• Wird die Bedingung im Kopf einer Kontrollstruktur umgebrochen, so richtet sich die Einrückung der nächsten Zeile am Beginn der Bedingung aus
• Die Einrückung kann vergrößert werden, um die Lesbarkeit der Klammerung zu verbessern

Die Einrückung im Kopf einer IF-Struktur (nicht IF-Schleife) ist daher standardmäßig 3, ggf. plus Einrückung je nach Klammerung.

Gibt es Source Formatter, die so etwas zulassen können? Oder bei denen man das sogar als Formatierung so einstellen kann?

Edit: IF ist nun keine Schleife mehr.