真的是高手都无法解决的问题吗?(0分)

X

xlieryu

Unregistered / Unconfirmed
GUEST, unregistred user!
我想中断当前下载![:(!]
stop: Boolean
//“开始下载”按钮的事件
stop:=false;
for j:= 1 to MyStrList.countdo
begin
Application.ProcessMessages;
if stop then
begin
break;
tmpStream.Free;
end;
try
tmpStream:=TFileStream.Create(DirEdit.Text+'/'+GetFileName(MyStrList.Strings[j-1]),fmCreate);
FNLabel.Caption :=GetFileName(MyStrList.Strings[j-1]);
FNLabel.Update;
idHttp2.Get(MyStrList.Strings[j-1],tmpStream);
finally
tmpStream.Free;
end;
end;
//“停止下载”按钮事件:
stop:=true;
目前的代码只能中断下一个任务的下载,而不能中断当前正在下载的下载。
请问有办法解决吗?
 
是不是以另一个身份又发的。我见过类似的代码,
你的上一贴给那么多分,解决了吗。
这 一贴怎么没分。
答案是:..........















其实很简单,将你的下载做成线程。
 
是的,这个帐号没分了。
上一贴解决的还是只能中断下一个任务,我想中断当前任务。
线程我一点也不懂,如果要做线程,我这个改动大不大?
 
就是说必须在程序执行时,你的程序能接受用户操作。
你上一贴的答案一文不值。只能瞬间接受用户操作,还要等当前文件下载完成后才退出 。
 
是的,现在程序运行时,几乎什么也做不了。
如果要搞多线程,改动大不大?
怎么改,讲点思路。
谢谢。
 
使用ICS吧,支持多线程和异步工作模式
 
到底怎样使用啊,能不能大概讲一下这些东西。
对我现有的程序改动大不大?
 
接受答案了.
 

Similar threads

S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
933
SUNSTONE的Delphi笔记
S
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
顶部