| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Запись типизированных файлов больше 2 гиг
A_Ton © (2010-08-18 12:14:00)Нужен пример копирования произвольного непрерывного фрагмента из такого файла в новый файл. Номера фреймов начала и конца фрагмента имею, читать могу, а вот копировать когда фрагмент находится в области за 2 гигами ( до 4 гиг ) не получается ;-( . Может кто помочь?
A_Ton (2010-08-18 13:24:00) [21]Удалено модератором
brother (2010-08-18 13:21:00) [22]Удалено модератором
A_Ton (2010-08-18 13:17:00) [23]Удалено модератором
A_Ton (2010-08-18 13:14:00) [24]Удалено модератором
brother (2010-08-18 13:11:00) [25]
Когда спрашиваете о коде
Даже и не просите других отладить ваш неработающий код, без какого-либо описания проблемы, которую должны найти. Отправка нескольких сотен строк кода со словами: «Чего-то у меня не работает», будет проигнорирована. Лучше отправить десяток строк кода со словами: «после 7-ой строки я ожидал увидеть <x>, но вместо этого получил <y>», и скорее всего ответ вы получите.
Если вы хотите, чтобы ваш код просто посмотрели, дали ему оценку, на забудьте указать какие именно куски кода необходимо посмотреть и почему.
A_Ton (2010-08-18 13:09:00) [26]Удалено модератором
brother (2010-08-18 13:07:00) [27]http://www.yakimchuk.ru/questions.htm
A_Ton (2010-08-18 13:07:00) [28]Удалено модератором
Игорь Шевченко (2010-08-18 13:04:00) [29]
> А по сути не копенгаген?
вполне копенгаген. но не ведусь
A_Ton (2010-08-18 13:02:00) [30]
> Подсказываю:
> 1. Убавь наглость
> 2. Смени деятельность
А по сути не копенгаген?
Игорь Шевченко (2010-08-18 13:01:00) [31]
> Для тех кто соображает этого фрагмента вполне хватит чтобы
> подсказать хотя бы на уровне идеи...
Подсказываю:
1. Убавь наглость
2. Смени деятельность
brother (2010-08-18 13:00:00) [32]> Вероятно Вы мало что понимаете в работе с фаёлами.
Видимо мало...
A_Ton (2010-08-18 12:59:00) [33]
> какие-то "ошметки" кода...
> <Цитата>
Вероятно Вы мало что понимаете в работе с фаёлами. Для тех кто соображает этого фрагмента вполне хватит чтобы подсказать хотя бы на уровне идеи...
brother (2010-08-18 12:57:00) [34]> [9] A_Ton © (18.08.10 12:54)
какие-то "ошметки" кода...
brother (2010-08-18 12:54:00) [35]> пришли код по которому можно также вылететь
) он его хорошо спрятал! А хочет - халявного прогера заиметь ;)
A_Ton (2010-08-18 12:54:00) [36]Hdc:=CreateFile(PChar(SaveFDlg.FileName),GENERIC_WRITE,0,nil,
CREATE_NEW,FILE_FLAG_WRITE_THROUGH,0);
If Hdc=0 then Begin
MessageBox(Handle,'Не могу открыть файл для копии!','Ошибка',MB_ICONERROR);
Exit; end;
ShowMessage('Cozdan!');
for i:= 0 to NFrames-1 do begin
if (i>=FrStPos) and (i<=FrEndPos) then continue;
RdKadr(i);
WriteFile(Hdc,RecFile,SizeOf(RecFile),bytesWritten, nil);
Application.ProcessMessages;
if (i mod 5 =0) then VTrBar.Position:=i;
end;
CloseHandle(Hdc);
sniknik (2010-08-18 12:52:00) [37]> и вылетаю...
куда? если на канары, в отпуск, например то хорошо... пришли код по которому можно также вылететь.
A_Ton (2010-08-18 12:43:00) [38]
> Похоже, Вы читаете весь файл сразу.
Нет, читаю фреймами. Обозначаю начало и конец нужного фрагмента, позиционируюсь правильно. Для записи использую
WriteFile(Hdc,RecFile,SizeOf(RecFile),bytesWritten, nil);
Создаю файл нулевой длинны и вылетаю...
brother (2010-08-18 12:43:00) [39]> Вы от ответа не уходите,
я и не ухожу
> я ведь никому не предлагал свой код
спрятал хорошо?
> мне Ваш пример нужен,
тебе нужен программист?
> а ен разбор моих ошибок!
вообще то так обычно и делается
A_Ton (2010-08-18 12:36:00) [40]
показывай код ;)
Вы от ответа не уходите, я ведь никому не предлагал свой код... мне Ваш пример нужен, а ен разбор моих ошибок!
| |
Страницы: 