Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Передача файла по сети [D6, Win95/98, WinXP]

ashnurov © (2004-06-24 11:34:00)
Подскажите как сделать чтобы Gauge показывал сколько скачано.
Я использую код
procedure TForm1.NMStrmServ1MSG(Sender: TComponent; const sFrom: String;
strm: TStream);
var
M : TFileStream;
begin
M := TFileStream.Create;
G1.MaxValue:=strm.Size;
m.CopyFrom(strm,strm.Size);
Gauge1.Progress:=m.Position;
m.Free;
end;
end.
----------------------------------
но он показывает сразу 100%

Doctor Deejay (2004-06-25 13:41:00) [1]
Я думал, что тормозов не осталось на этом сайте...

Digitman (2004-06-24 14:02:00) [2]

> ashnurov © (24.06.04 12:22) [4]

> где это вставить

что ЭТО ?

попорядку давай...

ashnurov (2004-06-24 12:22:00) [3]
где это вставить в мой код

Digitman (2004-06-24 12:15:00) [4]

> ashnurov © (24.06.04 12:10) [2]

что тебе непонятно ?

ashnurov (2004-06-24 12:10:00) [5]
А можно продемонстрировать на примере как это?

Digitman (2004-06-24 11:54:00) [6]
что мешает перед отправкой сообщений с последовательными фрагментами файла отправить сообщение с инф-цией о полной длине файла ?

а далее файл считывается равными кусками и каждый кусок передается отдельным сообщением, параметр strm покажет размер очередного принятого куска

если на принимающей стороне будет иметься полный размер файла, то установить параметры Gauge-индикатора при получении очередного сообщения не составляет труда

Наверх

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