社区
网络及通讯开发
帖子详情
如何动态创建TIdHTTP 控件?
hyllt
2002-11-28 10:26:55
我想在程序中动态的创建一组TIdHTTP控件 ?用new 去发现 没有constructor 帮助里有create函数 但是在程序中不能用
...全文
97
3
打赏
收藏
如何动态创建TIdHTTP 控件?
我想在程序中动态的创建一组TIdHTTP控件 ?用new 去发现 没有constructor 帮助里有create函数 但是在程序中不能用
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
3 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
itperson
2003-02-21
打赏
举报
回复
包含文件了嘛?
invalid
2002-11-28
打赏
举报
回复
下面是我在线程中创建。
__fastcall TPHttpThread::TPHttpThread(bool CreateSuspended)
: TThread(CreateSuspended)
{
HTTP=new TIdHTTP(NULL);
this->FreeOnTerminate = true;
}
__fastcall TPHttpThread::~TPHttpThread()
{
if(HTTP)
delete HTTP;
}
//---------------------------------------------------------------------------
void __fastcall TPHttpThread::Execute()
{
while(!Terminated)
{
try
{
this->Test();
}
catch(...)
{
}
Sleep((unsigned long)(tc.Intelval*1000));
// this->Suspend();
}
}
//---------------------------------------------------------------------------
int __fastcall TPHttpThread::Test()
{
//Indy9 TidHttp的代理相关的属性,统一放到了ProxyParams下面
//如果您使用的是Indy8 可能不能编译,请把ProxyParams->去掉
HTTP->ProxyParams->BasicAuthentication = tc.BasicAuthentication;
HTTP->ProxyParams->ProxyServer = tc.ProxyServer;
HTTP->ProxyParams->ProxyPort = tc.ProxyPort;
HTTP->ProxyParams->ProxyUsername = tc.ProxyUsername;
HTTP->ProxyParams->ProxyPassword = tc.ProxyPassword;
bFlag = true;
try
{
//获得指定地址的HTML头也可以采用下面的获得指定地址的HTML文本
HTTP->Head(tc.ServerAddress);
Message = HTTP->Response->ContentType;
//获得指定地址的HTML文本
// Message = HTTP->Get(tc.ServerAddress);
Synchronize(Msg);
Message = tc.ServerAddress+"可以打开了!";
PostMessage(Form1->Handle,WM_MYMESSAGE,(WPARAM)((Message).c_str()),0);
}
catch(Exception &e)
{
Message = e.Message;
bFlag = false;
Synchronize(Msg);
}
return bFlag?0:-1;
}
void __fastcall TPHttpThread::Msg()
{
Form1->Msg(bFlag,Message);
}
hyllt
2002-11-28
打赏
举报
回复
那位大侠 帮忙了
XE10.2移动开发例子(含
控件
和源码).zip
1. 创建和布局
控件
:掌握如何在界面上放置和排列
控件
,如使用TGridPanel或TFlowPanel进行动态布局。 2.
控件
属性设置:理解不同
控件
的属性,如字体、颜色、大小等,以及如何通过编程改变这些属性。 3. 事件处理:...
Delphi12
控件
之ICS-VCL-12.rar
《Delphi 12 中的ICS-VCL-12
控件
详解》 在Delphi 12这个强大的集成开发环境中,开发者们拥有丰富的组件库来构建功能强大的应用程序。其中,ICS(Internet Component Suite)VCL-12
控件
集是一个不可或缺的部分,它为...
IndyDemos-dephi
控件
同时,
TId
HTTP
Server组件则允许创建
HTTP
服务器,提供动态内容或API服务。 3. **FTP协议**:
TId
FTP组件实现了FTP客户端功能,可以进行文件上传、下载、列出目录等操作。而
TId
FTPServer组件则用于构建FTP服务器,处理...
http
s_Indy_Delphi2007.rar
1. 创建
TId
HTTP
组件:在你的表单上添加一个
TId
HTTP
组件,这将是你与远程服务器通信的主要接口。 2. 配置SSL:为
TId
HTTP
组件添加一个
TId
SSLIOHandlerSocketOpenSSL组件,这是处理SSL/TLS连接的中间件。将
TId
HTTP
的...
Delphi2005 B/S程序设计技巧集(4-11)
通过熟练掌握各种
控件
的用法,如按钮、文本框、列表框等,开发者可以创建出功能丰富的应用程序。文档中可能涉及如何自定义
控件
属性、事件处理以及
控件
间的交互。 2. **源码解析**:理解并分析源码是提升编程能力的...
网络及通讯开发
1,317
社区成员
8,874
社区内容
发帖
与我相关
我的任务
网络及通讯开发
C++ Builder 网络及通讯开发
复制链接
扫一扫
分享
社区描述
C++ Builder 网络及通讯开发
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章