Вниз
Скачать: CL | DM;

Текстовый файл   Найти похожие ветки 

← →
Фагот ©   (2004-01-19 09:52) [0]

Здравствуйте!
Мне нужно загрузить текстовый файл и обрезать его до определённого размера. Как я могу его обрезать?


← →
Романов Р.В. ©   (2004-01-19 09:56) [1]

Каким способом загружаешь файл?


← →
Erik ©   (2004-01-19 10:02) [2]

Stream := TFileStream.Create("MyFile", fmOpenReadWrite+fmShareExclusive);
Stream.Size := 1024; //Или сколько нужно.
Stream.Read
Stream.Write
........
Или использовать TMemoryStream


← →
Ega23 ©   (2004-01-19 10:35) [3]

Файл-ортодокс :-))))


← →
Amoeba ©   (2004-01-19 10:49) [4]

Файл Текстовый - и его обрезать до ОПРЕДЕЛЕННОГО размера? И как же этот размер определяется (и в чем измеряется) если файл именно текстовый а не бинарный? Какие-то сапоги в смятку.


← →
Фагот ©   (2004-01-19 11:18) [5]

Допустим, есть файл, размером 600 Мб. Текстовый. Мне нужно нарезать этот файл размером по 10 Мб. Что тут непонятного, какие сапоги всмятку?


← →
Ega23 ©   (2004-01-19 11:21) [6]

Читай по-очереди, какие проблемы-то?


← →
Anatoly Podgoretsky ©   (2004-01-19 11:39) [7]

Seek+Truncate
Открывать как File of byte.


← →
Фагот ©   (2004-01-19 11:42) [8]


> Seek+Truncate
> Открывать как File of byte.

А можно поподробнее? Ведь если я бы разбирался в данной теме я бы и вопрос не задавал...


← →
alex_*** ©   (2004-01-19 11:56) [9]

Грузишь файл, нарезаешь из него куски в TMemoryStream, последовательно их сохраняешь в файлы. При необходимости сносишь исходный файл.


← →
Amoeba ©   (2004-01-19 12:35) [10]


> Мне нужно нарезать этот файл размером по 10 Мб.

Нарезать кусками файл (хоть бинарный, хоть текстовый) и обрезать (как это звучит в вопросе) текстовый файл - это "две большие разницы" (в случае текстового файла обрезку логично делать по завершению строки, а не где попало - отсюда и мое недоумение).



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

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



Память: 0.47 MB
Время: -0.988 c
14-93664
Fanis
2004-01-07 22:55
2004.01.29
Связь таблиц


3-93348
raptorus
2004-01-04 10:10
2004.01.29
Здравствуйте, Мастера. Подскажите как перерисовывавать ячейки


9-93324
Bones
2003-07-13 03:07
2004.01.29
Физика движения летательного аппарата


7-93722
AXE_
2003-11-14 11:57
2004.01.29
обмен файлами через модем


7-93712
dron
2003-11-12 12:47
2004.01.29
Как программно создать переменную окружения




   Наверх