请问怎样在program工程文件中使用控件?? (100分)

  • 主题发起人 主题发起人 ajim
  • 开始时间 开始时间
A

ajim

Unregistered / Unconfirmed
GUEST, unregistred user!
[blue]比如说是<br>indy的<br>TIdHTTp<br>请给出源代码?<br>如果不行请告诉使用方法<br>idhttp1.Create(????);&lt;----这里应该添什么??<br>idhttp1.Get('http://orchid.diy.163.com/index.html',source);<br>idhttp1.Free;[/blue]
 
对于非可视控件,该处可以是 nil<br>如果可视一般先要声明一个 Tform 类,并声明一个变量后创建它。<br>&nbsp; &nbsp;这时该处应该说 form1 之类的。
 
请给出具体代码 我马上给分
 
idhttp1.Create(Application);&lt;----这里应该添Application or Self or nil<br>idhttp1.Get('http://orchid.diy.163.com/index.html',source);<br>idhttp1.Free;
 
这样我写过 编译有错误<br>
 
请问如何使用??怎么没人回答了<br>
 
D5下,没有indy,就用fastnet代替了。<br>其实,使用nil和Application都可以,如果使用application,需要uses forms。<br>你主要错在控件的创建上,仔细看我给你的代码,你会看懂的。<br>program Project1;<br><br>{$APPTYPE CONSOLE}<br><br>uses<br>&nbsp; SysUtils,<br>&nbsp; Psock,<br>&nbsp; NMHttp;<br><br>var<br>&nbsp; NMHTTP1: TNMHTTP;<br>begin<br>&nbsp; NMHTTP1:=TNMHTTP.Create(nil);<br>&nbsp; NMHTTP1.Get('http://orchid.diy.163.com/index.html');<br>&nbsp; NMHTTP1.Free;<br>end.<br>
 
idhttp1:=TidHTTP1.Create(Application);&lt;----这里应该添Application or Self or nil<br>idhttp1.Get('http://orchid.diy.163.com/index.html',source);<br>idhttp1.Free;
 
idhttp1:=TIdHttp.Create(nil);<br>idhttp1.Get('http://orchid.diy.163.com/index.html',source);<br>idhttp1.Free;<br><br>have a go?
 
多谢yzhshi指点
 
接受答案了.
 
后退
顶部