Форум: "Основная";
Текущий архив: 2002.11.04;
Скачать: [xml.tar.bz2];
ВнизЧтение и запись в файл Найти похожие ветки
← →
Semion (2002-10-25 08:33) [0]Подскажите как мне производить чтение и запись в фай свыше 300кб с использованием
f1,f2:textfile;
filename,filename2,s:string;
assignfile(f,filename);
assignfile(f2,filename2);
reset(f);
rewrite(f2);
while not(eof(f)) do begin
read(f,s);
{if я здесь произвожу оброботку символа}
write(f2,s);
end;
вот так обработку он производит только до 80кб и думает что eof=true
подскажите как мне сделать чтобы он проводил полную обработку или хотябы подскажите другой способ.
← →
MBo (2002-10-25 08:35) [1]Чудеса говоришь. Файл-то текстовый?
← →
Opuhshii (2002-10-25 08:35) [2]а что вы в него пишите,.. почитайте о textfile.
вообще,. для таких вещей лучще использовать TFileStream или WriteFile/ReadFile
← →
VaS (2002-10-25 09:05) [3]Нет, TFileStream не подходит (не разбирался, в чем там проблема у борланда, но на больших файлах все просто умирает). А вот WriteFile/ReadFile - самое то.
← →
Anatoly Podgoretsky (2002-10-25 09:07) [4]Судя по всему дело не в Борланде
← →
Bis (2002-10-25 09:52) [5]судя по всему, в оригинале стоит признак конца файла.
лучше уж тогда цикл поставить от 1 до размера файла, раз все равно посимвольно идет
← →
VaS (2002-10-25 10:18) [6]Anatoly Podgoretsky :))) Ценю Ваш юмор, но попробуйте записать через TFileStream 20М файл строками PChar по 100 байт. А потом то же самое - через WriteFile(). Вопрос "а почему бы не писать кусками по 10кбайт?" не принимается.
← →
MBo (2002-10-25 10:22) [7]>через TFileStream 20М файл строками PChar по 100 байт
Нет проблем.
← →
Anatoly Podgoretsky (2002-10-25 10:34) [8]Всеми путями писал и разными размерами, проблем нет, у тебя входной явно не текстовый файл, встречается преждевременный символ конца файла
← →
VaS (2002-10-25 11:12) [9]Удалено модератором
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.11.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c