IdTCPServer + ReadStream

← →
BanderLog (2005-05-25 11:41) [0]

Доброго дня Мастерам!
Подскажите как можно организовать ProgressBar, что бы визульно отобразит процесс получения данных?
У клиента понятно, в свойстве OnWork, а как у сервера?
Использую Indy 9.

← →
Digitman © (2005-05-25 13:08) [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.

IdTCPServer + ReadStream Найти похожие ветки