我把system32目录下的MSInet.ocx利用Delphi的ActiveX控件导入功能安装成功了,现在想知道这种Internet Transfer Control控件在Delphi中的用法。我是这样写的
//txt为一个string变量,
txt :=Inet1.OpenURL(URL1, 1);compile通过,run时,系统Debugger提示出错
---------------------------
Project DataTransfer.exe raised exception class EAccessViolation with message 'Access violation at address 00462114 in module '×××.exe'. Read of address 00000000'. Process stopped. Use Step or Run to continue.
---------------------------出错位置如下:unit InetCtlsObjects_TLB;procedure TInet.CreateControl;
procedure DoCreate;
begin
FIntf := IUnknown(OleObject) as IInet;//Debugger指针放在此处
end;
begin
if FIntf = nil then DoCreate;
end;我试了自己的URL1(是个本地的ASP)和值为www.microsoft.com的URL1,都提示这个错误。
请问是什么原因呢?
//txt为一个string变量,
txt :=Inet1.OpenURL(URL1, 1);compile通过,run时,系统Debugger提示出错
---------------------------
Project DataTransfer.exe raised exception class EAccessViolation with message 'Access violation at address 00462114 in module '×××.exe'. Read of address 00000000'. Process stopped. Use Step or Run to continue.
---------------------------出错位置如下:unit InetCtlsObjects_TLB;procedure TInet.CreateControl;
procedure DoCreate;
begin
FIntf := IUnknown(OleObject) as IInet;//Debugger指针放在此处
end;
begin
if FIntf = nil then DoCreate;
end;我试了自己的URL1(是个本地的ASP)和值为www.microsoft.com的URL1,都提示这个错误。
请问是什么原因呢?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货