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

[Delphi.Narium]

So?

Delphi-Quellcode:

var
  lsUsrDatum : TDate;
begin
  lsUsrDatum :=........;

  qyr_Buchungen.SQL.Clear;
  qyr_Buchungen.SQL.Add('select');
  qyr_Buchungen.SQL.Add('  Datum,');
  qyr_Buchungen.SQL.Add('  Name,');
  qyr_Buchungen.SQL.Add('  Vorname,');
  qyr_Buchungen.SQL.Add('  PersNr,');
  qyr_Buchungen.SQL.Add('  Abteilung,');
  qyr_Buchungen.SQL.Add('  xxxxxxxxxxxxxxxxxxxxxxxxxx ');
  qyr_Buchungen.SQL.Add('from Buchungen ');
  qyr_Buchungen.SQL.Add('where Datum > lsUsrDatum');

oder so?

Delphi-Quellcode:

  lsUsrDatum :=........;

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

Auf die #13#10 kann man durchaus verzichten, solange aus dem "Rest" ein gültiges Statement wird. (Die Datenbank braucht für die Ausführung keine schöne Formatierung - sprich: wenn das SQL ohne die #13#10 zum Einzeiler wird.)