|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
04.10.2020, 19:21 | #11 | |
Пользователь
Регистрация: 29.06.2008
Сообщений: 23
|
Цитата:
Последний раз редактировалось cb251132; 04.10.2020 в 20:27. |
|
05.10.2020, 03:19 | #12 |
ПШП
Участник клуба
Регистрация: 15.07.2013
Сообщений: 1,894
|
|
06.10.2020, 09:40 | #13 |
Пользователь
Регистрация: 29.06.2008
Сообщений: 23
|
|
06.10.2020, 11:40 | #14 |
Лис
Старожил
Регистрация: 18.09.2015
Сообщений: 2,409
|
cb251132 Нечего клянчить код. Никто его за вас его писать не будет. Тут работы на 1 час. Но кто же будет просто так час времени тратить?
Открываете файл как бинарный последовательно читаете блоками по 256 кбайт. В каждом блоке находите код новой строки он состоит из нескольких байт так что надо обработать границу корректно. Переводите смещение относительно блока в смещение от начала файла FileOffset=N*BlockSize+BlockOffset Запоминаете эти результаты в список. Затем используя TFilestream.seek() читаете нужные строки. Что касается метода предложенного northener он чутка по проще. Используем F:Text; вычитываем строки дополняем нулями SetLength(Str,40); и записываем при помощи Filestream.WriteBuffer(str[1],40*SizeOf(Char)); в файл.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
У дзен программиста программа делает то что он хотел, а не то что он написал . |
06.10.2020, 13:28 | #15 |
Форумчанин
Регистрация: 13.02.2012
Сообщений: 867
|
А эти числа обязательно должны быть в текcтовом файле или можно в бинарном?
|
06.10.2020, 14:04 | #16 | |||||
Старожил
Регистрация: 20.04.2008
Сообщений: 5,528
|
текстовый - нетекстовый
Цитата:
Цитата:
восемь максимально двузначных чисел займут при правильной организации 8 байт. Цитата:
Цитата:
Цитата:
программа — запись алгоритма на языке понятном транслятору
|
|||||
06.10.2020, 14:12 | #17 | |
Пользователь
Регистрация: 29.06.2008
Сообщений: 23
|
evg_m,
Цитата:
|
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
аналог TFileStream | JUDAS | C++ Builder | 5 | 14.06.2015 20:25 |
TFileStream | Baburek | C++ Builder | 3 | 04.07.2013 10:13 |
проблемы с TFileStream | andrey4623 | Общие вопросы Delphi | 9 | 01.11.2007 20:44 |
TFilestream | UnD)eaD)Snake | Win Api | 1 | 27.09.2007 21:22 |