Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.10.15;
Скачать: CL | DM;

Вниз

Определение текущей позиции потока при использовании IndyTCPser   Найти похожие ветки 

 
Merak ©   (2006-09-26 19:58) [0]

Всем привет! Кто нибудб мог бы мне помочь? короче пишу на делфе одну прогу, использую Indy TCP server/client для передачи данных, передаю поток данных, так вот как реализовть что бы при передаче данных в прогрессбаре отображался прогресс. Я пытался в отдельном процессе получить позишн передаваемого потока, но почему постоянно возвращался 0. Плиз подскажите как это можно реализовать


 
Eraser ©   (2006-09-26 20:21) [1]

> [0] Merak ©   (26.09.06 19:58)

см. события OnWork, OnBeginWork, OnEndWork.


 
Сергей М. ©   (2006-09-26 20:46) [2]


> короче пишу


Слишком коротко пишешь.


 
Merak ©   (2006-09-26 21:01) [3]


> Слишком коротко пишешь.

ну вот полнее код для передачи(в srf.Name - имя файла)

begin
             
                 AThread.Connection.WriteLn(srf.Name);                                 f:=TFileStream.Create(path+"inbound\"+uid+"\"+srf.Name,fmOpenRead);
                 AThread.Connection.WriteLn(IntToStr(f.size));
                 AThread.Connection.OpenWriteBuffer;
                 AThread.Connection.WriteStream(f);
                 AThread.Connection.CloseWriteBuffer;
                 f.Free
             end;


а вот для приёма

 begin
    name:=Idcli.ReadLn;
    size:=StrToInt(Idcli.ReadLn);
    f:=TFileStream.Create(path+"file\"+name,fmCreate);
    IDcli.ReadStream(F,size,false);
    f.Free;
    end;




Страницы: 1 вся ветка

Текущий архив: 2006.10.15;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.031 c
15-1159163673
WondeRu at work
2006-09-25 09:54
2006.10.15
Новый проект "DirectShow по-русски"


3-1155817812
Ann123
2006-08-17 16:30
2006.10.15
Database Desktop


6-1148039639
kernel
2006-05-19 15:53
2006.10.15
IP2HostName


2-1159348886
webpauk
2006-09-27 13:21
2006.10.15
Что использовать?


3-1155278466
wipr
2006-08-11 10:41
2006.10.15
Open and detach