Mehrzeiligen Text zuweisen incl. '

[norwegen60]

In C# gibt es die Möglichkeit, mehrzeiligen Text so zuzuweisen

Code:

            this.AddCmd(@"
            if not exists(select * from information_schema.tables where table_name = 'Tabelle1')
            begin
              create table Tabelle1
              (ID int not null Identity (1,1),
              Datum Datetime,
              Result varchar(15),
              Info varchar(50) null)
              on [primary]
            end
         ");

Diese Zuweisung hat den Vorteil, dass ich den kompletten Textblock kopieren und 1:1 im MsSQL-Manager testen kann

In Delphi kenn ich nur so was

Delphi-Quellcode:

quQuery.SQL.Text := 'if not exists(select * from information_schema.tables where table_name = ''Tabelle1'')';
quQuery.SQL.Add('begin');
quQuery.SQL.Add('  create table Tabelle1');
quQuery.SQL.Add('  (ID int not null Identity (1,1),');
quQuery.SQL.Add('  Datum Datetime,');
quQuery.SQL.Add('  Result varchar(15),');
quQuery.SQL.Add('  Info varchar(50) null)');
quQuery.SQL.Add('  on [primary]');
quQuery.SQL.Add('end');

Entsprechend mühsam ist es den eigentlich relevanten SQL-Text (der auch umfangreicher sein kann) im SQL-Manager zu testen. Zumal auch die doppelten ''Tabelle1'' bei Strings geändert werden müssen.

Hat jemand eine Idee, wie ich den Text ähnlich wie bei C# als ein Block zuweisen kann?

Direkt im quQuery-Editor kann ich es nicht zuweisen, da es viele solcher SQL's hintereinander geben kann.

Vielen Dank im Voraus