XEx in die Quellcodeformatierung "eingreifen"?

[Union]

Zitat:

Zitat von Mavarik (Beitrag 1242126)

So erkenne ich schon am IF, ob es 300 Zeilen tiefer noch ein ELSE gibt.

In dem Fall solltest Du diese ungemein hässliche Konvention wegschmeissen und cnPack einsetzen, da wird Dir so was (teiweise) visualisiert. Mittel- und langfristig solltest Du aber eher ein Refactoring machen (mit den neuen IDEs ja ein Kinderspiel).

[Uwe Raabe]

Zitat:

Zitat von Mavarik (Beitrag 1242126)

Wenn ein IF kein ELSE hat dann:
...
Wenn ein IF ein else hat beseitzt:

Das wird auch für jeden mir bekannten anderen Source-Code-Formatierer sicher schwierig werden, da hier nicht sequentiell das nächste Token die Formatierung vorgibt, sondern erst das

Delphi-Quellcode:

else

gesucht werden muss. Der Formatierer müsste also eine Art Look-Ahead implementieren. Das macht aber soweit ich weiß keiner (zumindest nicht in dem Umfang).

[Uwe Raabe]

Zitat:

Zitat von Mavarik (Beitrag 1242126)

So erkenne ich schon am IF, ob es 300 Zeilen tiefer noch ein ELSE gibt.

Das ist an sich schon ein Don't-Do-It!

[Sir Rufo]

Ich bin immer noch für

Delphi-Quellcode:

if
  IsSomething or ( SomeValue < 0 )
then
  begin
    foo;
  end
else
  begin
    bar;
  end;

geht mit dem (eingebauten) Codeformatter, wenn

Delphi-Quellcode:

if // ein Kommentar

:stupid:

Zitat:

Zitat von Uwe Raabe (Beitrag 1242131)

Zitat:

Zitat von Mavarik (Beitrag 1242126)

So erkenne ich schon am IF, ob es 300 Zeilen tiefer noch ein ELSE gibt.

Das ist an sich schon ein Don't-Do-It!

:thumb:

[Furtbichler]

Zitat:

Zitat von Mavarik (Beitrag 1242126)

Bin halt daran seit über 20 Jahren gewöhnt... Und kann daher NIE die Formatierung ausnutzen.

Dann gewöhn dich doch einfach um. Tut nicht weh (Hab ich auch gemacht). Und deine 300 Zeilen langen THEN-Teile solltest Du in die Tonne treten.

Mittlerweile ist es mir vollkommen wurscht, wie jemand formatiert. Wenn es mir nicht gefällt, dann formatiere ich es um.

Rein persönlich formatiere ich so, das ich nicht allzuviele Zeilen vergeude, speziell einzelne 'then' und 'begin' finde ich überflüssig, weil sie noch ne Zeile hinzufügen. Wenn ich Scrollradproduzent wäre, oder Mittelfingerorthopäde, dann würde ich das toll finden, aber bin ich nicht.
Es ist nicht weniger lesbar, wenn so ein 'then begin' am Ende einer Zeile steht. Eigentlich ist das 'then' ja überflüssig, also ein Füllwort. Also kann das auch ans Ende der Zeile. Na ja, und so ein 'begin'... klar, kann man isoliert auf eine einzelne Zeile packen, aber wozu? Bringt doch auch kein Mehr an Lesbarkeit. Ohne Indentierung würde ich natürlich anders denken, aber da die folgenden Zeilen alle eingerückt sind und max 5 Zeilen später eh das 'end' steht, ist das doch wurscht, ob das begin nun irgendwo sichtbar ist.

Was ich ganz grauslich finde, ist das Ausrichten von Zuweisungen, also z.B.:

Delphi-Quellcode:

a.... := 123; // Punkt duch Leerzeichen ersetzen
b1234 := 45;

Da bekommt der Lesefluss sofort einen Schluckauf. Hab ich aber alles früher auch gemacht. Mittlerweile finde ich das vergeudete Zeit und sehr schlecht lesbar ist es auch. Parameterlistenausrichtung ist ähnlich behämmert, außer, für Leute, die nach Stunden bezahlt werden. Ich verwende meine Zeit lieber dafür, den Code durch Refaktorisierung und Befolgen der einschlägigen Regeln selbstdokumentierend zu machen und überlege mir lieber 2x, wie ich einen Bezeichner nenne, damit mein Partner ihn versteht, als mir zu überlegen, ob das 'begin' auf ne neue Zeile kommt oder nicht. Gut, dafür gibbet ja Formatier-O-Maten, insofern ist das Erdbeereis vs. Schoko (also Geschmackssache).

Das einzige, was hier zählt, ist doch, das sich alle im Team einig sind und man ein Formatierungstool hat, was sich so einstellen lässt. Wer heute noch per Hand Code hin und herschubst, der hat echt zu viel Zeit.

Aber am aller aller Schlimmsten finde ich mittlerweile die Verwendung von Präfixen, um den Datentyp von Bezeichnern zu kodieren ('bFlag', 'iCounter' usw). Wozu das gut sein soll, in Zeiten einer modernen IDE, frage ich mich wirklich. Zu 99% ergibt sich der Datentyp aus dem Kontext und die restlichen 1% sind fast immer schlechter Code bzw. ein falscher Bezeichner.

[sx2008]

Zitat:

Zitat von Mavarik (Beitrag 1242126)

So erkenne ich schon am IF, ob es 300 Zeilen tiefer noch ein ELSE gibt.

Da würde ich gerne mal ein Beispiel aus deinem Sourcecode sehen.
Wenn du Probleme hast auf einen Blick den Else-Teil zu erfassen, dann liegt das einfach daran dass du zuviel Code im Then-Teil hast.
Oder wenn die If-Bedingung nicht in maximal 2 Zeilen passt dann macht man etwas falsch.
Hier mal ein kleines Beispiel:

Delphi-Quellcode:

begin
  // prüfe ob Land in franz. Überseegebiet liegt
  if country='GP' or country='MQ' or country='RE' or country='GF' or country='PM' then
  begin
    ...

Diese If-Abfrage ist mit einer Zeile noch überschaubar, aber man braucht einen Kommentar um zu verstehen was das Ganze eigentlich soll.
Und hier die verbesserte Variante:

Delphi-Quellcode:

function IsFrenchOversea(const country:string): boolean;
const
   ll : array[0..4] of string = (
   'GP',   // Guadelupe
   'MQ',   // Martinique
   'RE',   // Réunion
   'GF',   // French Guyana
   'PM'    // Saint Pierre & Miquelion
   );
begin
   Result := StrIsOneOf(country, ll);
end;

begin
  if IsFrenchOversea(country) then
  begin
    ...

Insgesamt ist es mehr Code aber man braucht keinen Kommentar mehr um zu verstehen was da passiert.
Eigentlich wollte ich ein Beispiel bringen mit über 20 Teilbedingungen aber das war mir zu viel Schreibarbeit.

Also wenn eine If-Bedingung zu komplex oder zu lang wird dann packt man sie in eine Unterfunktion!

Das Gleiche gilt auch für den Then-Teil oder den Else-Teil.
Wenn es zuviele Zeilen werden dann ist das ein Zeichen dass hier etwas faul ist ("der Code stinkt").
Dann heisst es die vielen Codezeilen in Unterfunktion auszulagern.

Zitat:

Zitat von Mavarik (Beitrag 1242126)

Bin halt daran seit über 20 Jahren gewöhnt... Und kann daher NIE die Formatierung ausnutzen.

Das bedeutet dass du seit über 20 Jahren zuviel Code in eine Methode, Funktion, Prozedur oder Block packst und deshalb immer Probleme mit der Formatierung hast.
Ich kann nur empfehlen die Ursache abzustellen, dann braucht du auch keinen Codeformatierer.

[Der schöne Günther]

Ich dachte grade eine vollkommen selbst definierbare Code-Formatierung sei so ziemlich das Highlight von gexperts?

[Bernhard Geyer]

Zitat:

Zitat von Mavarik (Beitrag 1242112)

Zitat:

Zitat von Bernhard Geyer (Beitrag 1242110)

Ein Bild sagt mehr als tausend Worte: http://www.cnpack.org/images/cnwizards.gif

Ja aber das sagt leider nix aus, ob und wie man die Sourcecodeformatierung ändern kann... Oder übersehe ich da etwas? :roll:

Auch du meinst eine Reformatierung eines Codes nach bestimmten Regeln. Das müsste AFAIK auch dabei sein.

[RWarnecke]

Zitat:

Zitat von Mavarik (Beitrag 1242126)

"Meine" Syntax lautet:

Wenn ein IF kein ELSE hat dann:

Delphi-Quellcode:

if bal then
  begin
  end;

Wenn ein IF ein else hat beseitzt:

Delphi-Quellcode:

if bla or blub or foo or nixnutz or (length(S) < 2)
  then begin // <- An dieser Zeile kann ich alles erkennen egal wie lang der if usw. ist.
       end
  else begin
       end;

So erkenne ich schon am IF, ob es 300 Zeilen tiefer noch ein ELSE gibt.

Bin halt daran seit über 20 Jahren gewöhnt... Und kann daher NIE die Formatierung ausnutzen.


Mavarik

Wenn Du unbedingt diese Formatierung beibehalten willst, was mich persönlich sehr stören würde, dann baue Dir doch ein Code-Template. Damit kannste die Formatierung für eine IF-Abfrage Deinen Wünschen entsprechend gestalten. Ich würde aber an Deiner Stelle den Code umformatieren, so wie es meine Vorredner schon erwähnt haben und wie ich es in meinem ersten Beispiel aus Beitrag #8 erstellt habe. Dann noch CNPack Wizards installiert und man hat einen super Überblick, was die Abfrage, Schleifen u.s.w. angeht.

[Uwe Raabe]

Zitat:

Zitat von sx2008 (Beitrag 1242135)

Delphi-Quellcode:

begin
  // prüfe ob Land in franz. Überseegebiet liegt
  if country='GP' or country='MQ' or country='RE' or country='GF' or country='PM' then
  begin
    ...

Oder so:

Delphi-Quellcode:

  
uses System.StrUtils;
...
  // prüfe ob Land in franz. Überseegebiet liegt
  if MatchStr(country, ['GP', 'MQ', 'RE', 'GF', 'PM']) then
...