RSS订阅 | 匿名投稿
您的位置:网站首页 > 组件

Delphi调用Http接口方法

usesIdHTTP;SS:=TStringStream.Create('',TEncoding.UTF8);HttpClient:=TIdHttp.Create();ParamList:=TStringList.Create;tryParamList.Add('LoginName=xx');ParamList.Add('Password=xx');ParamList.Add('SmsKind=8…
类别:组件 标签:idHttp 作者:admin 日期:2018-01-09 08.07.27

TIdHTTPResponseInfo 中文乱码问题解决

procedureTFm_Main.onCommandGet(AContext:TIdContext;ARequestInfo:TIdHTTPRequestInfo;AResponseInfo:TIdHTTPResponseInfo);beginAResponseInfo.ContentType:='text/html';AResponseInfo.CharSet:='UTF-8';ARespon…
类别:组件 标签:IdHTTP 作者:admin 日期:2018-01-09 08.01.25

Delphi 调用极光推送服务端HTTP API实例

下面是delphi调用极光推送服务端HTTPAPI实例HttpClient.HandleRedirects:=True;HttpClient.Request.ContentType:='application/json';HttpClient.Request.BasicAuthentication:=True;HttpClient.Request.Authenticat…
类别:组件 标签:idHttp 作者:admin 日期:2018-01-09 08.00.22

delphi IdHTTP.post超时导致整个线程停止问题解决

在网络繁忙或者网络异常的情况下,TIdHTTP.post(URL)没有任何信息反馈,一直阻塞,导致整个线程停止设置ReadTimeoutConnectTimeout后问题解决
类别:组件 标签:IdHTTP 作者:admin 日期:2018-01-09 07.59.18

delphi IdHTTP代理设置

HttpClient.ProxyParams.BasicAuthentication:=True;HttpClient.ProxyParams.ProxyServer:='192.168.1.1';HttpClient.ProxyParams.ProxyPort:=808;HttpClient.ProxyParams.ProxyUsername:='user';HttpClient.ProxyPa…
类别:组件 标签:IdHTTP 作者:admin 日期:2018-01-09 07.58.50

delphi TNetHttpClient上传文件

Delphi如何实现multipart/form-data方式上传文件呢?以前我们是使用indy,也就是用idHttp加TIdMultiPartFormDataStream来实现;本着研究精神,今天看了一下TNetHttpClient的定义,发现有个functionPost(constAURL:st…
类别:组件 标签:TNetHttpClient 作者:admin 日期:2018-01-08 20.44.13

delphi TNetHTTPCleint提交JSON串

这里,我们拿友盟的推送接口做个测试,它是要求同时提交get参数和post参数,post参数内容为json串,需要引用DateUtils和md5算法单元,代码如下:procedureT****1.Button3Click(Sender:T****);varvHttp:TNetHTTPClien…
类别:组件 标签:TNetHTTPCleint 作者:admin 日期:2018-01-08 20.17.06

delphi IdTCPClient和IdTCPServer主要属性

IdTCPClient属性1:IOHandler如果有相应的输入/输出操作,那么IOHandler相对应的组件或接口将提供一个虚拟/抽象的输入/输出接口给相应的网络连接2:Intercept如果有一个网络连接正在使用,那么Intercept提供的组件或接口…
类别:组件 标签: 作者:admin 日期:2018-01-07 16.07.40

delphi indy 10.5.7的数据发送接收的用法

发送结构体:TMyData=recordid:Integer;Name:Array[0..20]ofChar;Sex:Array[0..10]ofChar;Age:Byte;Address:Array[0..256]ofChar;UpdateTime:double;end;//发送结构体:procedureTForm2.Button2Click(Sender:TObject…
类别:组件 标签: 作者:admin 日期:2018-01-07 16.05.33

delphi idhttp的用法

idhttp的用法1)POSTfunctionPostMethod(http:TIDhttp;URL:string;Params:TStringList):string;varRespData:TStringStream;beginRespData:=TStringStream.Create('');trytryifhttp=nilthenExit;Http.Post(URL,Params…
类别:组件 标签:idhttp 作者:admin 日期:2018-01-07 16.00.42

delphi获取webbrowser中的元素的值

procedureTForm1.btn1Click(Sender:TObject);vardoc:olevariant;str:string;begindoc:=wb1.Document;str:=doc.all.xx.value;ShowMessage(str);end;
类别:组件 标签:webbrowser 作者:admin 日期:2018-01-07 15.09.14

delphi KbmMW安装

系统环境及相关软件版本:Windows764位,DelphiXEVersion15.0.3953.35171,Indy10.5.7<pstyle="margin:10pxauto;padding:0px;color:#393939...
类别:组件 标签:KbmMW 作者:admin 日期:2018-01-05 17.19.20

Delphi IdHttp组件+IdHttpServer组件实现文件下载服务

usesidhttp,IdHTTPServer;//idhttp组件提交下载请求procedureTVodService.Button3Click(Sender:TObject);varh:TIdhttp;MyStream:TMemoryStream;url:string;beginMyStream:=TMemoryStream.Create;h:=Tidhttp.Create(n…
类别:组件 标签: 作者:admin 日期:2018-01-05 14.07.40

Delphi IDFtp用法

如果在同一电脑上运行多个IdHTTPServer实例,IdHTTPServer使用时候,一定要注意“DefaultPort”属性,其实真正绑定端口是这个属性决定的,所以希望IdHTTPServer绑定在那个端口上,应该把要绑定的端口设置在“Default…
类别:组件 标签:IdHTTPServer 作者:admin 日期:2018-01-05 14.07.12

delphi idHTTP最简洁的修改和取得Cookie例子

procedureTForm1.Button1Click(Sender:TObject);varHTTP:TidHTTP;html,s:string;i:integer;beginHTTP:=TidHTTP.Create(nil);tryHTTP.HandleRedirects:=True;HTTP.AllowCookies:=True;HTTP.Request.CustomHeaders.Val…
类别:组件 标签:idHTTP 作者:admin 日期:2018-01-03 23.19.05

Delphi IdHTTP 设置cookie 和访问后读取Cookie 值

procedureTForm1.btn1Click(Sender:TObject);varIdHTTP:TIdHTTP;mstrCookie:string;Cookies:TIdCookieManager;i:Integer;beginIdHTTP:=TIdHTTP.Create(nil);IdHTTP.Request.UserAgent:='';mstrCookie:='aaa=5555&…
类别:组件 标签:IDhttp 作者:admin 日期:2018-01-03 23.17.34

DELPHI TWebbrowser 响应回车键(EWB响应正常,无需额外代码)

增加一个ApplicationEvents,在Message事件中如下代码(WB看自己的WEBBROWSER控件命名)procedureTFrmMain.ApplicationEvents1Message(varMsg:tagMSG;varHandled:Boolean);//专为IE内核WEBBROWSER响应回车键constStdKe…
类别:组件 标签:TWebbrowser 作者:admin 日期:2018-01-03 23.12.51

delphi 给Label1字加边的又一个算法

procedureTForm1.Button1Click(Sender:TObject);vartc:TCanvas;i,j:integer;color:TColor;egcolor:TColor;begintc:=Label1.Canvas;//Label1上面必须有字,而且是黑色的egcolor:=RGB(0,255,0);fori:=1toLabel1.Width-…
类别:组件 标签: 作者:admin 日期:2018-01-03 22.41.03

delphi 从TWebBrowser WebBrowser得到全部html源码

网上查询出很多方法,归结起来有两种1、使用IPersistStreamInit接口实现,函数名都是functionGetHtml(constWebBrowser:TWebBrowser):string;这个函数确实可以得到全部的html源码,但是里面用到了hHTMLText:=GlobalAl…
类别:组件 标签:TWebBrowser 作者:admin 日期:2018-01-03 22.37.08

Delphi 从 TWebBrowser中获得当前输入处的链接

varunsubscribeStr:string;ovSelection:OleVariant;innerDom,ovTextRange,nnode:OleVariant;beginovSelection:=Edit.doc.selection;//获得选择对象ovTextRange:=ovSelection.createRange;//createaTextRangefromthec…
类别:组件 标签:TWebBrowser 作者:admin 日期:2018-01-03 22.29.56