Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.02.17;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.01 c
4-53329
AlexRu
2003-01-05 13:55
2003.02.17
Какое значение у константы FOF_NORECURSION ?


7-53290
seacat
2002-12-15 15:06
2003.02.17
Восстановление файлов


1-53087
Дима2003
2003-02-06 09:44
2003.02.17
Как забрать почту с Exchange?


1-52841
PrettyFly
2003-02-07 12:27
2003.02.17
Таблицы в FastReport...


14-53282
Johnny Split
2003-01-31 10:26
2003.02.17
Созлание окна произвольной формы???





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский