Скачать: CL | DM;

Чтение и запись в файл   Найти похожие ветки 

← →
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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c