Delphi - 如何将字符串连接分成几行

Question

我有一个很长的SQL文本,我想分配给查询SQL.我这样做的方式如下:

SQL.Text:= 'SELECT T1.COLUMN1,T2.COLUMN2,T1COLUMN3..........,'+
          ' T1.COLUMNn FROM TABLE1 T1 INNER JOIN '+
          ' TABLE2 T2 ON T1.ID=T2.ID'+
          ' WHERE T1.COLUMN10=100'

实际的SQL比这长20倍.我的问题在于换行符.当我格式化源代码(Ctrl + D)时,它有时会在我输入时留下行,但有时它会删除换行符,我会得到这样的结果:

 'SELECT T1.COLUMN1,T2.COLUMN2,T1COLUMN3 ' + 'FROM TABLE1 T1 INNER JOIN '+  'TABLE2 T2 ON T1.ID=T2.ID'

这导致"行太长(超过1023个字符)"错误.有趣的是,所有这些都不会发生这种情况.我无法理解受影响的线和不受影响的线之间的区别.我需要在"+"符号之后或之前换行.我该怎么做呢？

Answer 1

您也可以使用添加功能.

SQL.Clear;
SQL.ADD('SELECT T1.COLUMN1,T2.COLUMN2,T1COLUMN3..........,');
SQL.ADD(' T1.COLUMNn FROM TABLE1 T1 INNER JOIN');
SQL.ADD(' TABLE2 T2 ON T1.ID=T2.ID');
SQL.ADD(' WHERE T1.COLUMN10=100');