Длинные строки в константах

[Climber]

Мне надо сохранить в константе SQL-запрос. Компилятор ругается, что строки больше 255 символов делать нельзя. Пробовал объявить массив констант - тоже не дает (опять ругается на длинну строки, хотя я запрос разбил на куски по ~200 - 240 байт). Получается, что единственный выход - написать что-то типа:

Код: Выделить всё

const
sql1='select ... ';
sql2='from ... ';
sql3='where ...';
sql4='group by ... ';
...
sql123='order by 1';
MyQuery.SQL.Text:=sql1+sql2+sql3+sql4+...+sql123;

В Delphi длинные строки работали...

[Vadim]

Попробуй применить типизированную константу AnsiString. Она позволяет хранить больше символов.

[GrayEddy]

Директива {$H+} присутствует?

[Climber]

Директива {$H+} присутствует.
Опытно-экспериментальным путем я установил, что константа должна определяться примерно так:

Код: Выделить всё

const
MyConst = 'string string string string string ... string '+
     'string string string string string ... string '+
     'string string string string string ... string ';
//   |<---     здесь примерно 200 символов      --->|

То есть ограничение не 255 символов, а чуть-чуть меньше, около 200 - 220 (я ориентировался по координатам курсора, которые выводятся в строке статуса в редакторе).