读书人

在Delphi中调用Wininet API的有关问题

发布时间: 2012-03-30 17:32:09 作者: rapoo

在Delphi中调用Wininet API的问题?希望高手指点迷津。
关于InternetOpen

InternetConnect

HttpOpenRequest

HttpSendRequest

HttpQueryInfo

InternetSetFilePointer

InternetReadFile 函数的调用实现下载文件。

在审明函数的时候,提示HINTERNET 未说明。

========================CODE:========================================
var
Form1: TForm1;

implementation

{$R *.dfm}
function InternetOpen(lpszCallerName: PChar; dwAccessType: DWORD;
lpszServerName: PChar; nServerPort: PChar;
dwFlags: DWORD): HINTERNET; stdcall;external 'wininet.dll ' name 'InternetOpen '; {那几个函数还未来审明。}

end.
//----------------------------
procedure TForm1.Button1Click(Sender: TObject);
begin
showmessage( '不懂~~~~~~~~ ');
end;
========================================================================
错误信息:
[Error] Unit1.pas(27): Undeclared identifier: 'HINTERNET '
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas '


未了些资料,要么是海量代码,要么就是轻轻一点。

希望大伙能讲一下。




[解决办法]
换成dword试一下!
[解决办法]
句柄不就是一个DWORD嘛,一样的~

读书人网 >.NET

热点推荐