------------ Дoбавленo:
Dilma, твой код вот так не проще сделать
'n','r': begin
if nl then
t := t + #10
else
t := t + #13;
nl := not nl;
end;