我定义一个线程
type
findbt=class(TThread)//创建发现内容的线程
private
protected
function _Get(url: String) : String;
Procedure Execute;override;
public
end;在procedure findbt.Execute
var
idhttp:tidhttp;
a:integer;
begin
idhttp:=tidhttp.create(nil);
a:=0;
while a=0 do
begin
s:=_get('http://xxx.xxx.xxx');//我想在_get函数中使用上面的IDHTTP如何用啊?不想在_get()中一直动态创建再删除.
end;end;
type
findbt=class(TThread)//创建发现内容的线程
private
protected
function _Get(url: String) : String;
Procedure Execute;override;
public
end;在procedure findbt.Execute
var
idhttp:tidhttp;
a:integer;
begin
idhttp:=tidhttp.create(nil);
a:=0;
while a=0 do
begin
s:=_get('http://xxx.xxx.xxx');//我想在_get函数中使用上面的IDHTTP如何用啊?不想在_get()中一直动态创建再删除.
end;end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货