IdTCPServer + ReadStream [D7]
BanderLog © (2005-05-25 11:41:00)
Доброго дня Мастерам!
Подскажите как можно организовать ProgressBar, что бы
визульно отобразит процесс получения данных?
У клиента понятно, в свойстве OnWork, а как у сервера?
Использую Indy 9.
Digitman (2005-05-25 13:08:00) [1]
ReadStream() требует 1-м параметром объект-наследник класса
TStream
сделай своего прямого или непрямого наследника этого класса,
перекрой вирт.метод Write(), в теле метода всякий раз при его
вызове ты будешь получать инф-цию об очередном числе байт,
записываемых в твой стрим, эту инф-ция будет нужна для инкремента
св-ва ProgressBar.Position
а чтобы установить св-во ProgressBar.Max воспользуйся
инф-цией из справке к методу TIdTCPConnection.ReadStream()
цитата :
Note: When AByteCount is -1, and AReadUntilDisconnected is
False, it is assumed that the first 4-bytes in the Indy buffer
contains the length of buffered data in Internet format. ReadStream
uses ReadInteger to convert the value to Intel byte-order prior to
reading the remaining data from the Indy buffer.
Наверх 
ЧАТ |
Орешник |
|
