Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.17;
Скачать: CL | DM;

Вниз

readln   Найти похожие ветки 

 
RomaIzDurdoma ©   (2003-02-08 21:50) [0]

Читаю построчно файл readln(f1,s1)
но у s1 пропадают начальные пробелы.
Можно ли это исправить? (файл текстовый, в DOS кодировке)


 
Palladin ©   (2003-02-08 21:53) [1]

такого не может быть

код сюда
и кусок файла (небольшой с пробелами)


 
RomaIzDurdoma ©   (2003-02-08 22:11) [2]


> код сюда


AssignFile(Vf1,opendialog1.FileName);
Reset(Vf1);
while not SeekEof(Vf1) do
begin
Readln(Vf1,ss);
oemtochar(pchar(ss),pchar(ss));
...
end;




> и кусок файла (небольшой с пробелами)

на мыло что-ли?


 
Palladin ©   (2003-02-08 22:21) [3]

нет не надо

а как определил что пробелы пропадают?


 
RomaIzDurdoma ©   (2003-02-08 22:39) [4]

Точку останова поставил на oemtochar и просмотрел ss


 
Palladin ©   (2003-02-08 22:51) [5]

сразу после readln напиши
Application.MessageBox(PChar("""+ss+"""),"!");
и посмотри что выведется. будут пробелы или нет.


 
RomaIzDurdoma ©   (2003-02-08 23:29) [6]

Пробелов нет.


 
Palladin ©   (2003-02-08 23:38) [7]

ты уверен что в файле они есть?


 
RomaIzDurdoma ©   (2003-02-08 23:40) [8]


> ты уверен что в файле они есть?

давай я вышлю файлик?



Страницы: 1 вся ветка

Текущий архив: 2003.02.17;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.014 c
14-53258
blackman
2003-02-01 21:56
2003.02.17
Не прогой единой жив человек !


3-52752
FilSM
2003-01-30 11:13
2003.02.17
Фильтр в TADOQuery


1-53118
Checist [root]
2003-02-07 11:20
2003.02.17
Проблем с шрифтом


3-52768
Explorer
2003-01-30 13:32
2003.02.17
Ado или БДЕ?


1-53041
iNew
2003-02-11 05:08
2003.02.17
Как определить достаточно на дискете места для записи или нет