| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Докачка файла по сети! [D6, WinXP]
Chak © (2003-01-01 16:51:00)Собственно интересует вопрос добавления в конец файла недостающей его части. Использую TFileStream.
У меня в итоге размер файла получается идентичным с исходным его размером, а при попытке его открытыя(ну допустим Врдовского документа) выдается ошыбка что путь к файлу неверен.
вот пример того что я использую:
...
s:= Socket.ReceiveText;
...
If FileExists("c:\tmp\test.doc") Then
fs:= TFileStream.Create("c:\tmp\test.doc", fmOpenWrite);
try
fs.Seek(0,soFromEnd);
fs.WriteBuffer(s[1], Length(s));
finally
fs.Free;
Verg (2003-01-04 15:56:00) [1]Запятая лишняя, sorry :)
Может попробовать
.....
fs.Seek(0,soFromEnd +1);
....
Verg (2003-01-04 15:55:00) [2]Может попробовать
.....
fs.Seek(0,soFromEnd, +1);
....
ION T (2003-01-04 15:34:00) [3]> s:= Socket.Receive Text;
доки бинарные....
Reindeer Moss Eater (2003-01-04 15:15:00) [4]Сори, не разглядел. Не весь файл.
Reindeer Moss Eater (2003-01-04 14:44:00) [5]Все равно будет скачан ВЕСЬфайл
Андрей Ульченко (2003-01-04 14:35:00) [6]Собственно чтобы проверить полноценно докачивается файл или нет,
можно следующим :
1) команда fc/b <file_name_1> <file_name_2> (для бинарных файлов)
fc /L <file_name_1> <file_name_2> (для текстовых файлов)
2) запаковать архиватором и после докачки прогнать
архиватором на целосность
3) md5.exe
Лучше разбираться на кекстовом, только надо пример подходящий выбрать. и построчно сравнивать, где разойдется смотреть почему!
Удачи.
Chak (2003-01-01 20:47:00) [7]==> Cobalt © (01.01.03 18:04)
непонятно както,
ведь в результате размер получается идентичным, а просматриваю (ну допустим текстовый документ) блокнотом - весь текст в норме, и открыветтся без проблем, а вот вордовский нет!
И если файл копируется с первого раза(без обрыва) то никаких проблем нету!
Cobalt (2003-01-01 18:04:00) [8]Попробуй делать "откат" на сколько-то КБ (смотри в TFileStream, какими порциями он читает)
| |
