Registriert seit: 10. Jan 2005
Ort: Bönen
1.174 Beiträge
Delphi 11 Alexandria
|
AW: Bestimmte Zeilen aus der autom. Codeformatierung (Strg+D) ausschließen
27. Apr 2018, 23:33
Hallo Stahli,
wenn ich ein SQL Statement formatiere sieht das stark vereinfacht in etwa so aus:
Delphi-Quellcode:
var
lsUsrDatum : TDate;
begin
lsUsrDatum :=........;
qyr_Buchungen.SQL.Text := select 'Datum, Name, Vorname, PersNr, Abteilung, xxxxxxxxxxxxxxxxxxxxxxxxxx from Buchungen' + #13#10 +
'where Datum > lsUsrDatum'
Ich hätte die Formatierung der Zeilen gern so wie ich diese im SQL Studio eingegeben habe:
Delphi-Quellcode:
var
lsUsrDatum : TDate;
begin
lsUsrDatum :=........;
qyr_Buchungen.SQL.Text :=
'select Datum,' + #13#10 +
'Name,' + #13#10 +
'Vorname,' + #13#10 +
'PersNr,' + #13#10 +
'Abteilung,' + #13#10 +
'xxxxxxxxxxxxxxxxxxxxxxxxxx ' + #13#10 +
'from Buchungen ' + #13#10 +
'where Datum > lsUsrDatum'
Wegen den ganzen ' + #13#10 + sieht das vermutlich ungewohnt aus. Aber das SQL erschließt sich zumindest mir um einiges besser. Größere Statements sind dann noch viel schlechter lesbar/ nachvollziehbar.
Jürgen Indes sie forschten, röntgten, filmten, funkten, entstand von selbst die köstlichste Erfindung: der Umweg als die kürzeste Verbindung zwischen zwei Punkten. (Erich Kästner)
|