Показать сообщение отдельно
Старый 30.11.2009, 19:21   #11
GreyT
Неактивный пользователь
 
Пол:Мужской
Регистрация: 30.11.2009
Сообщений: 3
Репутация: 1
По умолчанию Re: Delphi7 - Символ продолжения строки

Удобочитаемость легко обеспечивается обьявлением одной простой константы

const
CRLF = #13#10;
var
q: TQuery;
begin
q.SQL.Text:=
'SELECT bla_bla_bla'+CRLF+
' FROM tab1, tab2, tab3'+CRLF+
' WHERE tab1.a=tab2.b'+CRLF+
' AND tab2.c=tab3.d'+CRLF+
' ORDER BY tab3.e';

и усьо
GreyT вне форума
 
Ответить с цитированием Вверх
 
Время генерации страницы 0.02323 секунды с 10 запросами