Текущий архив: 2002.10.14;
Скачать: CL | DM;
Вниз
переходить на следующую строку Найти похожие ветки
← →
INCOGNITO © (2002-10-03 01:44) [0]Вопрос простейший, но ответа не могу найти.
Проблемма такая: я програмно создаю файл (текстовой) и происываю в него какой-то текст, но онвыходит водну строку. Я не знаю с помощю какого символа переходить на следующую строку.
Я так понимаю, это код из ASCII, но #20 не помогает :-(
← →
Юрий Зотов © (2002-10-03 01:51) [1]А при чем здесь #20?
Перевод строки - #10 (LF - line feed)
Возврат каретки - #13 (CR - carriage return)
← →
INCOGNITO © (2002-10-03 01:54) [2]Большое спасибо
← →
INCOGNITO © (2002-10-03 03:12) [3]Млин,попробовал - не работает :-(
...
var
x : char;
mz : char;
f, f1 : textfile;
...
...
while eof(f)=false do
begin
Read(f,x);
case x of
"1" : mz:="s";
"2" : mz:="x";
"3" : mz:="c";
"4" : mz:="f";
"*" : mz:=#10;
end;
Write(f1,mz);
end;
...
...
Вот в этом куске кода мне нужно, чтоб при встрече в файле f символа "*" в файле f1 вместоэтого происходил перевод строки
← →
MBo © (2002-10-03 06:20) [4]Writeln
Не помешает прочитать простейшую книжку по Паскалю
← →
Kacnep (2002-10-03 06:52) [5]2 Incognito...
var
mz:string;
...
while eof(f)=false do
begin
Read(f,x);
case x of
"1" : mz:="s";
"2" : mz:="x";
"3" : mz:="c";
"4" : mz:="f";
!!! "*" : mz:=#10#13; !!! или #13#10 - точно не помню но на 99 % уверен что будет работать (давно не работал с текстовыми файлами просто....
end;
Write(f1,mz);
end;
← →
han_malign (2002-10-03 10:23) [6]\n:
#$0D#$0A - DOS
#$0A - Unix
Страницы: 1 вся ветка
Текущий архив: 2002.10.14;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.018 c