请教在delphi中使用IdHTTP控件,怎样获取下载速度
我在使用IdHTTP控件做文件下载的时候,想计算出文件下载速度,但是无论怎样都无法成功,请好心人帮忙解决!
代码如下：
Delphi(Pascal) code:
procedure TForm1.IdHTTP1Work(Sender: TObject; AWorkMode: TWorkMode; const AWorkCount: Integer);
begin
nsize.Caption := '已下载:'+floattostr(ByteToStr(AWorkCount))+'MB';
speeds.Caption := '下载速度:'+floattostr(GetSpeed(AWorkCount-ProgressBar1.Position))+'kb/s';
ProgressBar1.Position:=AWorkCount;
end;
已下载的字节获取是没问题的,但是就是无法计算出下载速度.AWorkCount是已下载的字节.
ProgressBar1.Position的值在程序执行时被初始化为0,然后我在文件下载过程中将当前下载字节数减去ProgressBar1.Position的值,接着再把AWorkCount的值赋给ProgressBar1.Position,从而计算出下载速度.
但当我用AWorkCount - ProgressBar1.Position 却无法计算出下载速度,请问该怎样解决呢？
是不是我的思路有问题呢
getspeed是什么？
下载速度是总体的平均下载速度，还是本次事件里的下载速度？
前者应该用已下载总字节数除以总的时间
后者应该AWorkCount-上次的AWorkCount，除以当前时间-上次的时间
getspeed是转换字节的一个函数
我是想要获取本次事件里的下载速度
我是这样想的，AWorkCount是当前已下载的总字节，我先用AWorkCount-ProgressBar1.Position，从而获取本次下载字节数.然后再将AWorkCount的值赋给ProgressBar1.Position
但是这样却无法计算出来
{{
相关问答：
请教各路高手。武林前辈。我将B.EXE做成资源文件，然后加到123.dll中。用A.EXE来调用123.dll中的B.EXE
请各位前辈帮忙指教下。A.exe如何来调用dll中的exe？代码又该如何写？
无人回答？
做成资源� ......
delphi 手动装载驱动文件提示：
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
是不是这个驱动必需要用INF来安装。。用自带的INF来装是正常的。用手动装载就提示如上� ......
各位高手赶快帮帮忙。
现在有一个delphi写的dll，函数中有PInteger的返回参数，在delphi中可以正常调用，但是我在vb里写的时候就不知道该怎么来调用了。
请看代码
以下是delphi中的函数定义和调用代码，能正常运� ......
我在网上找了个关于IEBHO的代码，然后按照哪个设置了，后来运行的时候出现
构建
[警告] Project2.dpr(14): File not found: 'MYbho.TLB'
[警告] Project2.dpr(16): File not found: 'MYbho.RES'
......
