![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TClientSocket & TProgressBar [D7, XP]
atas-sheriff © (2006-12-20 18:10:00)Здраствуйте!
Я отправляю файл клиентом на сервер:
fs:=TFileStream.Create(FileEdit.Text,fmOpenread);
fs.Position:=0;
ClientSocket1.Socket.SendText('Size:'+IntToStr(fs.Size)+#0+'Name:'+ExtractFileName(OpenDialog.FileName)+#0);
ClientSocket1.Socket.SendStream(fs);
Как сюда "приделать" ProgressBar? Надо ж знать сколько осталось ждать
atas-sheriff (2006-12-21 11:40:00) [41]Делаешь своего наследника TFileStream - 1перекрываешь в нем вирт.метод Read - 2
Сергей М. (2006-12-21 11:36:00) [42]
> я непонял
Не понял конкретно что?
atas-sheriff (2006-12-21 11:15:00) [43]А можно кодом? А то я непонял:(
Сергей М. (2006-12-21 08:16:00) [44]
> Как сюда "приделать" ProgressBar?
К SendStream() - легко. Делаешь своего наследника TFileStream и перекрываешь в нем вирт.метод Read
Джо (2006-12-20 23:05:00) [45]Правой кнопкой «Сохранить объект как...». Это архив rar.
Джо (2006-12-20 23:04:00) [46]> [9] Chuk & Gek © (20.12.06 21:57)
> Неее.... со "спасибо поторопился"...
> Он не загружается, а открывает какую то страницу вот цитата:
Правой кнопкой «Сохранить объект как...». Это архив rar.
atas-sheriff (2006-12-20 22:07:00) [47]Ти там тоже подумай как ProgressBar приштопать)
Chuk & Gek (2006-12-20 22:04:00) [48]Всё спасибо скачал Opera рулит!
atas-sheriff (2006-12-20 22:02:00) [49]Загрузка файла.
Вы запросили файл с сайта www.atas-sheriff.by.ru, размещённого на бесплатном хостинге BY.RU. Чтобы скачать запрошенный файл, пройдите по ссылке:
/downloads/transfer.rar Здесь нажимай ПРАВУЮ КНОПКУ МЫШи и "Сохранить обект как..."
Администрация BY.RU предупреждает вас, что испольняемые файлы, загруженные из непроверенных мест могут содержать вирусы и нанести вред вашему компьютеру. Будьте внимательны и осторожны.
Что ещё можно сделать?
Вы можете отказаться от загрузки и вернуться на предыдущую страницу.
Каталог и поиск помогут быстро получить нужную информацию: [AD]
Chuk & Gek (2006-12-20 22:00:00) [50]ну ты какнибудь в цикле..
atas-sheriff (2006-12-20 21:58:00) [51]Хе) Как??? Я немогу найти "сколько отправил")
Chuk & Gek (2006-12-20 21:57:00) [52]Неее.... со "спасибо поторопился"...
Он не загружается, а открывает какую то страницу вот цитата:
Rar!\x1A\x7Ћ•
[4Ё’ыЙ}фЁТr•"H%ґJ•/ъYXЫъ\x19>\x13ј¤Ъya\x4S‘€И'‚ncU~Qї№вЋ–#|йм)%7\x19°Фxу\xC\xFvVщИЬ
·ўY\x6$уS'р\x7FхА\x193ф—вт\x7FвсwЁмЮ
х‘y‘6\x15ЭСЗY\x1AЏи2\x1Dп5Uf?C’Kъ5V¬{xN\x17
M™%М]пЪЇсс
atas-sheriff (2006-12-20 21:57:00) [53]Как туда приштопать ProgressBar??? Ну сказите ктота plizzzzzz
Chuk & Gek (2006-12-20 21:55:00) [54]А на счёт прогрессбара- сколько байтов отправил от общего размера считай...
Chuk & Gek (2006-12-20 21:54:00) [55]Спасибо большое! буду изучать...
atas-sheriff (2006-12-20 21:50:00) [56]Вот здесь пример http://www.atas-sheriff.by.ru/downloads/transfer.rarА как нащот TProgressBar ктота чтота знает???
Chuk & Gek (2006-12-20 21:06:00) [57]А в сервере что надо написать??? если, конечно, Вас не затруднит...:)
Chuk & Gek (2006-12-20 21:05:00) [58]Извените, но это всё???
я думал там сложно...
Джо (2006-12-20 21:03:00) [59]> [1] Chuk & Gek © (20.12.06 20:58)
> Слушай а как ты отправляешь файл??? ищу не могу найти...
> Приведи код плиз!!!
Ггг. А в [0] не код, по-твоему? :D
Chuk & Gek (2006-12-20 20:58:00) [60]Слушай а как ты отправляешь файл??? ищу не могу найти... Приведи код плиз!!!