Quelltext in String konvertieren

[peterbelow]

Zitat von Codehunter:

Hallo,

Ich habe oft den Fall, dass ich längere mehrzeilige SQL-Queries als String brauche. Entsprechende Einfüge-Funktionen gibts in MMX, CnPack und GExperts, nur dummerweise bei keinem so wie ich es bräuchte. Ein Beispiel:

Code:

SELECT T1.A AS NAME_1,
       T2.A AS NAME_2,
       T2.B AS NAME_3
FROM MY_TABLE_1 AS T1
LEFT JOIN MY_TABLE_2 AS T2
  ON T1.KEYFIELD=T2.KEYFIELD
WHERE T2.C=:MY_PARAM_1
ORDER BY T2.B;

Daraus sollte werden:

Delphi-Quellcode:

'SELECT T1.A AS NAME_1, ' +
       'T2.A AS NAME_2, ' +
       'T2.B AS NAME_3 ' +
'FROM MY_TABLE_1 AS T1 ' +
'LEFT JOIN MY_TABLE_2 AS T2 ' +
  'ON T1.KEYFIELD=T2.KEYFIELD ' +
'WHERE T2.C=:MY_PARAM_1 ' +
'ORDER BY T2.B;';

Ich habe mir dafür mal vor Jahrzehnten ein kleines Hilfsprogramm geschrieben, das ich über das Tools-Menu in die IDEs einklinke. Statement in die Zwischenablage kopieren, Programm aufrufen, den geänderten Text in den Sourcecode einfügen, fertig. Wo hab ich jetzt wieder den Sourcecode dafür gelassen... Oh Mann, 2003. Die Zeit fliegt dahin...

[Codehunter]

Ich danke euch erstmal allen für die vielen Vorschläge. Inzwischen bin ich wohlbehalten in Rom angekommen Allen ein schönes WE!