Управляющие символовы

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
ENB83
Новичок
Сообщения: 23
Зарегистрирован: 19 мар 2008, 11:57
Откуда: Новосибирск

Управляющие символовы

Сообщение ENB83 »

нужен символ перехода на следующую строку:

resh:='1' + ? +'2';

чтобы в итоге получилось:
1
2
RAJAH
Местный житель
Сообщения: 932
Зарегистрирован: 18 фев 2008, 12:49

Сообщение RAJAH »

chr(13)
ENB83
Новичок
Сообщения: 23
Зарегистрирован: 19 мар 2008, 11:57
Откуда: Новосибирск

Сообщение ENB83 »

resh:='1' + chr(13) +'2';
не помогло, может потому что я это делаю в RTF:
.LinkForm 'enb_test_160908' Prototype is PRBDOC
.Group 'Продажа'
.NameInList 'enb test c 16.09.08'
.Create view SchDog
from
BaseDoc (ReadOnly),
Dogovor (ReadOnly)
where
((
BaseDocNrec == BaseDoc.nRec
and BaseDoc.cDogovor==Dogovor.nrec
));

.var
a:byte;
resh:String
.endvar
.fields
nomer
resh
page_symb
.endfields
.{
.{table 'SchDog.BaseDoc'
.}
.begin
//message(nomer);
a:=1;
case a of
1..2: resh:='1'+chr(13)+'2';
3: resh:=’3’;
else resh:=’4’;
end;
end.
.{CheckEnter ISEXCLASS
.}
.{CheckEnter ISGROUP
.}
.{
.}


^
^
.if DELIMITER
Р---------------------------------------------------------------------------------------------------------------------------- Р
.else
.end
^
.}
.endform
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Сообщение Masygreen »

#9 - код символа табуляции в стандарте ASCII;
#10 - код символа перехода на новую строку в стандарте ASCII;
#13 - код символа перевода каретки в стандарте ASCII;
#26 - код символа конца файла
Время ведет!
Ответить