Bestimmte Zeilen aus der autom. Codeformatierung (Strg+D) ausschließen

[juergen]

So, ich habe nochmal genauer nachgeschaut und getestet. Ich nutze nun die integrierte Formatierung von Castalia und das Highlighting von cnPack. Die Formatierung von cnPack habe ich deaktiviert.
Bei den Castalia Optionen gibt es eine Option "Zeilenumbrüche des Benutzers beibehalten" (true/false). Ich habe das aktiviert.
Damit klappt alles wie ich es möchte!

Allen ein schönes Wochenende!

[juergen]

@Delphi.Narium,
danke für deine Hilfe!
Meine autom. Formatierung hatte alle Zeilen in einer Zeile umformatiert (bis zur eingestellten Breite). Das war doof.
Das konnte ich nun beheben, siehe meinen vorigen Post. Das cnPack-Highlighting habe ich noch aktiv, weil es für mich von Vorteil ist, dass das an der Maus stehende "Wort" alle anderen Vorkommen mit gelb anzeigt.

[dummzeuch]

Der Code Formatter in GExperts erlaubt es, Bereiche von der Formatierung auszuschließen, indem man sie in bestimmte Kommentare einschließt. Standardmässig sind das {(*} bis {*)}.

[himitsu]

Gerade bei dem Clear+Add würde ich doch mal über ein WITH nachdenken, auch wenn man es sonst meiden sollte.

Auch sollte/könnte man sich überlegen, ob man dort die Validierung ausschaltet?
Bei vielen SQL-Komponenten wird standardmäßg nach/bei jeder Äderung des SQL-Statements was mit dem SQL gemacht, wie z.B. Parameter suchen und die Parameter-Liste anpassen. Eventuell auch schon Pepared-Zeugs mit dem Statement.

Eine komplette "einmalige" Zuweisung könnte sich da angenehmer erweisen.

PS: bei solchen Multiline mache ich persönlich die + vorne hin, denn da sieht man gleich, dass es zusammen gehört

Delphi-Quellcode:

'abc',
'def'

'abc'
+ 'def'

Bezüglich #13#10, so wäre eigentlich ein sLineBreak besser, aber ich gebe zu, dass es mich im Codefluss etwas stört.
Außerdem wird bei der Zuweisung vieler StringListen der Zeilenumbruch intern angepasst, bzw. es wird sowieso zerlegt und "intern" Zeilenweise zugewiesen (hier aber mit Deaktivierung von dem obengenannten), womit es bei derZuweisung egal ist welchen Zeilenumbruch mann nimmt, also mach ich es mit da einfacher.

Und ob Zeilenumbruch nach letzter Zeile, das kann man sich auch überlegen. Also z.B. konsequent immer dran, falls man mal erweitern will und man es soch nicht vergisst.
Ich hab da aber eh immer ein , , ) oder ; ahinter, also ist die Zeile sowieso schon anders, also kann ich den #10 auch weglassen.

Delphi-Quellcode:

qyr_Buchungen.SQL.Text :=
  'select Datum, Name, Vorname, PersNr, Abteilung, ' + sLineBreak +
  'from Buchungen ' + sLineBreak +
  'where Datum > lsUsrDatum';

qyr_Buchungen.SQL.Text :=
    'select Datum, Name, Vorname, PersNr, Abteilung, ' + sLineBreak
  + 'from Buchungen ' + sLineBreak
  + 'where Datum > lsUsrDatum';

qyr_Buchungen.SQL.Text :=
    'select Datum, Name, Vorname, PersNr, Abteilung, ' + #13#10  // oder + #10
  + 'from Buchungen ' + #13#10
  + 'where Datum > lsUsrDatum';

// so mach ich es am Liebsten
qyr_Buchungen.SQL.Text :=
    'select Datum, Name, Vorname, PersNr, Abteilung, '#10
  + 'from Buchungen '#10
  + 'where Datum > lsUsrDatum';

Letztendlich ist alles Geschmackssache.

Aber was mit schon öfters gefehlt hat, ist ein Multiline-String.
Sei es durch offenlassen am Zeilenende, was ja aktuell verboten ist, aber das würde der Pascal-Syntax die wenigsten Probleme bereiten (PS, der Code-Highlighter im Forum kann es schon lange )
Oder durch sowas, wie z.B. Heredoc, was man aus PHP, SQL, Java/JavaScript uvm. kennt.

SQL-Code:

S = $$
  abc
  def
  xzz
$$;

S = $$abc
def
xyz$$;

S = $irgendas$abc
def mit $$ drin
xzz$irgendas$;

[Uwe Raabe]

Seit einigen Delphi-Versionen kann man auch sowas schreiben. Das ist insbesondere dann übersichtlicher, wenn das SQL mit if-then-else und/oder Schleifen zusammengesetzt wird.

Delphi-Quellcode:

qyr_Buchungen.SQL.BeginUpdate;
qyr_Buchungen.SQL.Clear;
qyr_Buchungen.SQL.AddStrings([
  'select',
  ' Datum,',
  ' Name,',
  ' Vorname,',
  ' PersNr,',
  ' Abteilung,',
  ' xxxxxxxxxxxxxxxxxxxxxxxxxx ',
  'from Buchungen ',
  'where Datum > lsUsrDatum'
  ]);  
qyr_Buchungen.SQL.EndUpdate;

Aber ich sehe gerade: es geht ja gar nicht um das Zusammensetzen der SQL-Befehle

[Delphi.Narium]

Es geht um die Lesbarkeit und da find' ich Deinen Vorschlag schon sehr gut, bin nur noch nie auf die Idee gekommen, das zu probieren.

Die Frage ist jetzt halt, was macht der Code-Formatter daraus?

[juergen]

Zitat von Delphi.Narium:

Es geht um die Lesbarkeit ...

Genau das war mein eigentliches Anliegen, da ursprünglich das SQL-Statement alles in voller Zeilenlänge umformatiert wurde und ich das SQL nicht vernünftig lesen konnte.

Zitat von Delphi.Narium:

Die Frage ist jetzt halt, was macht der Code-Formatter daraus?

Der Formatter lässt die Formatierung genauso wie Uwe es geschrieben hatte.

Wieder was gelernt, danke dafür an alle!

[Uwe Raabe]

Zitat von Delphi.Narium:

Es geht um die Lesbarkeit und da find' ich Deinen Vorschlag schon sehr gut, bin nur noch nie auf die Idee gekommen, das zu probieren.

Die Frage ist jetzt halt, was macht der Code-Formatter daraus?

Der Delphi-eigene Formatter bringt das in der Standardeinstellung auch durcheinander. Aber auch dort kann man ja das Zeilenumbrüche beibehalten einschalten. Wem das nicht gefällt, weil sich das ja auf den gesamten Code auswirkt, kann auch ans Ende jeder Zeile einen // Kommentar setzen. Der verhindert das Zusammenziehen der Zeilen. Vielleicht verleitet das ja auch mal zu einem sinnvollen Kommentar. (Der Forums-Formatter ist etwas eigensinnig mit den Leerzeichen)

Delphi-Quellcode:

qyr_Buchungen.SQL.AddStrings([      //
  'select',                         //
  ' Datum,',                        //
  ' Name,',                         //
  ' Vorname,',                      //
  ' PersNr,',                       //
  ' Abteilung,',                    //
  ' xxxxxxxxxxxxxxxxxxxxxxxxxx ',   //
  'from Buchungen ',                //
  'where Datum > lsUsrDatum'        //  
  ]);