Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 31.08.2017, 14:05   #1
GoldenEagle88
 
Регистрация: 24.07.2015
Сообщений: 8
По умолчанию Как разделить файл на части

Есть файл txt , как его разделить на 5 файлов?
Получаю кол-во строк в файле , делю на 5
Код:
j := list.count div 5;
Получаю ,сколько нужно сохранить в один файл.
Но в цикле for , слишком долго делит если файлов больше 5 , какие есть еще решения?
GoldenEagle88 вне форума Ответить с цитированием
Старый 31.08.2017, 14:17   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

файл текстовый? разделить нужно строго по строкам и равномерно?
файл ОЧЕНЬ большой? (мегабайты, десятки мегабайт, сотни мегабайт?)


Цитата:
Сообщение от GoldenEagle88 Посмотреть сообщение
Но в цикле for , слишком долго делит если файлов больше 5
покажите код, как Вы делите на части 1 файл?
Serge_Bliznykov вне форума Ответить с цитированием
Старый 02.09.2017, 10:38   #3
NetSpace
Участник клуба
 
Аватар для NetSpace
 
Регистрация: 03.06.2009
Сообщений: 1,814
По умолчанию

создай файловый поток. загружай файл в этот поток и оттуда уже выбирай нужную часть. там надо индексы рассчитать: откуда копировать и сколько. и всё. и никаких циклов
Программирование - это единственный способ заставить компьютер делать то, что тебе хочется, а не то, что приходится.
NetSpace вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Разделить программу на 2 части hojidor Паскаль, Turbo Pascal, PascalABC.NET 3 28.05.2014 14:00
Разделить видеоизображение на части nikmay Мультимедиа в Delphi 1 18.05.2012 15:14
Открыть файл, разделить ячейку на 1000, сохранить файл, закрыть файл. Как? Ник Харди Microsoft Office Excel 7 30.01.2012 18:47
Как разделить *.Width/*.Height с сохранением дробной части pavellyba Общие вопросы Delphi 1 09.04.2011 15:27
Слово/цифру разделить на части 0mega Microsoft Office Excel 5 31.01.2010 22:46