Lange Strings/Queries im Quellcode umbrechen

[white-desert]

Hai,
hier gehts mir um die Übersichtlichkeit des Quellcodes.
In meinem letzten Projekt habe ich Query-Aufrufe wie diese:

Delphi-Quellcode:

Query :=   'SELECT '+
             'Id, '+
             '(SELECT '+
                 'Baustufen.name '+
               'FROM Baustufen WHERE '+
                 'projekte_baustufen_links.Baustufe_Id = ('+
                   'SELECT ID from my_ids WHERE id = '+ ExtBstId +' ORDER BY Id ASC Limit 1'+
                 ') LIMIT 1), '+
             'von, '+
             'bis '+
           'FROM Projekte_Baustufen_Links '+
           'WHERE Projekt_Id = '+Pr_Id + 
           ' ORDER BY Projekte_Baustufen_Links.Baustufe_Id ASC ';

Eines sieht wohl jeder: Dieses String-Gebilde ist zu unübersichtlich, vor allem wegen diesen vielen Anführungszeichen.

In PHP könnte man das ja so schreiben:

Code:

$Query =  'SELECT 
             Id,
             (SELECT 
                Baustufen.name
                FROM Baustufen WHERE 
                  projekte_baustufen_links.Baustufe_Id = (
                   SELECT ID from my_ids WHERE id = '. $ExtBstId .' ORDER BY Id ASC Limit 1
                  ) LIMIT 1), 
             von, 
             bis 
           FROM Projekte_Baustufen_Links 
           WHERE Projekt_Id = '.$Pr_Id .'
           ORDER BY Projekte_Baustufen_Links.Baustufe_Id ASC ';

Das sieht schon viel einfacher aus und ist auch schneller zu schreiben. Gibt es denn keine ähnliche
Schnell-Schreibweise bei Delphi? Evtl. irgendwelche Prozessorbefehle?
Also dass man einen ewig langen String gaaanz einfach umbrechen und mit Variablen bestuecken kann?

Danke im Voraus für eure Hilfe!