Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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
1-45259
Nicko
2002-10-04 12:11
2002.10.14
Директория проэкта


3-45214
Soft
2002-09-20 17:35
2002.10.14
Удаление повторяющихся полей с помощью SQL HELPPP!!!!!!


1-45347
Kolya
2002-10-02 02:28
2002.10.14
Array


3-45237
Димон1
2002-09-20 12:26
2002.10.14
Можно ли так сделать? ADOQuery1.Parameters ....


7-45603
Codec
2002-07-18 11:51
2002.10.14
Программное нажатие клавиш CTRL+ALT+DELETE