读书人

自定义的历程放类中使用会报错直接放

发布时间: 2012-10-19 16:53:35 作者: rapoo

自定义的过程放类中使用会报错,直接放form中正常。
以下过程我放在一个没有窗体的pas中,用来做公共过程,方便操作,引用了idhttp单元。

procedure JsXz(XzName,BdName:string);
var
tStream: TMemoryStream;
idhttp1:TIdhttp;
begin
tStream :=TMemoryStream.Create;
idhttp1.Get(XzName,tStream);
tstream.SaveToFile(BdName); //ExtractFilePath(paramstr(0))为当前路径
tstream.Free;
end;

在form1中执行上面的下载过程报错,大意是idhttp1没创建的意思。但是这个过程我直接写在form1中执行侧正常,请问要如处理呢?谢谢

[解决办法]
当然报错!!你根本没有:idhttp1:=TIdhttp.Create();!!

读书人网 >.NET

热点推荐