Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TidTCPClient сколько данных передали? [D7, WinXP]


Страницы:   1 2

Чудак ©   (2008-11-17 22:22:00) 

передаю файл через TidTCPClient

client:TidTCPClient

передаю так:
client.writestream(stream, true, true, stream.size);

Как мне во время передачи отобразить сколько данный в данный момент передано???

спасибо


Сергей М.   (2008-11-19 08:26:00) [1]


> Чудак   (19.11.08 00:06) [23]


Хотелось бы вместо дикого коверкания языка услышать нормальное вразумительное описание проблемы - что сделано и что не получается.


Eraser   (2008-11-19 03:26:00) [2]

> [23] Чудак   (19.11.08 00:06)


> хотелось бы за место стеба увидеть ответ на вопрос как определить
> скорость передачи данных

бери производную от количества данных по времени передачи этих данных - будет тебе скорость. эт вроде в школе изучается )


Чудак   (2008-11-19 00:06:00) [3]

хотелось бы за место стеба увидеть ответ на вопрос как определить скорость передачи данных


Сергей М.   (2008-11-18 21:35:00) [4]


> все пошло


Не вижу ничего пошлого


Чудак   (2008-11-18 20:57:00) [5]

исправлюс

если сделать так
procedure TForm1.cliWork(Sender: TObject; AWorkMode: TWorkMode;
 const AWorkCount: Integer);
begin
progressbar.Progress:=AWorkCount;
end;

тут вообщем вроде все пошло
но мне кажется это лажа
иу клиента завешение намного ранше (зависит от размеа файла)происходит чем у сервера почему???
Как скорость то узнать?
таймером читать AWorkCount не получается:(


Сергей М.   (2008-11-18 20:48:00) [6]

Ох и стыдно же, наверно, быть таким тупым ..


Чудак   (2008-11-18 20:32:00) [7]

про TIdConnectionIntercept тама ничерта нет

и зачем грамоздит если как то можно без него читать сколько передалось!
а с TIdConnectionIntercept я ваще повис там чето все замарочено:)


Сергей М.   (2008-11-18 20:25:00) [8]


> читал вот выдержка .. затем возникает серия


Что. вот так прямо прочитал выдержка и сразу возникает ?!

Охх ё ..

Ну а что насчет [12] ?
Что там, в Глубинах, по этому поводу возникает сразу прочитамши ?


Чудак   (2008-11-18 20:05:00) [9]

читал вот выдержка из книги глубины indy
Затем возникает серия событий OnWork. В событие OnWork передаются Sender, WorkMode и текущий WorkCount. Данное событие используется для отображения прогресса.
Как? вразумите неверного его отобразить!!!!!


Сергей М.   (2008-11-18 19:45:00) [10]


> Чудак   (18.11.08 19:40) [15]


Ты справку-то проштудировал, запутанно-углумленный ты наш убоже ?)

Или так и будешь на паперти попрошайничать да язык родной коверкать ?


Чудак   (2008-11-18 19:40:00) [11]

ну ладно глумиться то
Набросать примерчик можно???
А то я совсем запутался


Сергей М.   (2008-11-18 18:58:00) [12]


> Чудак



> набр асать



> упроженный


Сам-то понял что сказал ?)

Брась упроженная - это в лес к лешим, а не к мастерам делфи)


Чудак   (2008-11-18 17:17:00) [13]


> Slym ©   (18.11.08 16:26) [11]
> проще будет написать TFileStreamReadCalc...
> наследника от TFileStream и в нем считать, только точность
> будет в "буферсайз" который в client.writestream используется
> можно прокладку наследника от TStream написать который читает
> из присоединенного TStream подсчитывает и отдает... только
> теже проблемы с точностью

А можно примерчик набрасать упроженный???


Сергей М.   (2008-11-18 16:46:00) [14]

Ну тогда пользуй TIdConnectionIntercept

Уж к нему-то примеры есть 100%-но


Slym   (2008-11-18 16:26:00) [15]

проще будет написать TFileStreamReadCalc...
наследника от TFileStream и в нем считать, только точность будет в "буферсайз" который в client.writestream используется
можно прокладку наследника от TStream написать который читает из присоединенного TStream подсчитывает и отдает... только теже проблемы с точностью


Чудак   (2008-11-18 16:17:00) [16]


> ПРимеры имеются в папке с демо-проектами Инди

Я извиняюсь но в примерах такого нету
Ну нету как с клиента отслеживать сколько передалось данных:(((


Сергей М.   (2008-11-18 15:28:00) [17]

ПРимеры имеются в папке с демо-проектами Инди


Чудак   (2008-11-18 15:15:00) [18]


> Следует создать свой экз-р TIdIOHandler (в нем и обрабатывать
> OnWork) и  назначить его св-ву IOHandler объекта TIdTCPClient

Ого, а примерчик можно а то сложновато сразу вьехать


Сергей М.   (2008-11-18 13:10:00) [19]

Следует создать свой экз-р TIdIOHandler (в нем и обрабатывать OnWork) и  назначить его св-ву IOHandler объекта TIdTCPClient


Чудак   (2008-11-18 13:00:00) [20]

файл: 60 мегабайт
в OnWork после тока как передался и вылез его полный размер тоже 60 мегабайт


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо