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

Delphi 多线程 获取网页的问题

winsockfunctionGetIPFromName(Name:s****ing):s****ing;varWSAData:TWSAData;HostEnt:PHostEnt;beginWSAStartup(2,WSAData);HostEnt:=gethostbyname(PansiChar(Name));withHostEnt^doResult:=****at('%d.%d.%d.…
类别:网络 标签: 作者:admin 日期:2016-01-19 23.30.47

delphi中用socket解析域名获得IP地址

需引用WinSock单元varWSAData:TWSAData;Socket1:TSocket;Addr:TSockAddr;Re:Integer;begin//初始化WinSockif(WSAStartup(MakeWord(2,0),WSAData)<>0)t...
类别:网络 标签: 作者:admin 日期:2016-01-19 23.27.14

Delphi xe IntraWeb 程序在IIS下的发布详细教程

开发环境:DelphiXE8,In****aWeb14.0.40,win764位.
类别:网络 标签:In****aWeb 作者:admin 日期:2016-01-09 15.07.43

Delphi使用IdHttp 获取 HttpsURL内容

usesIdHTTP,IdSSLOpenSSL;functionHttpsGet(constaURL,aContentFile:string):Boolean;varvIdHTTP:TIdHTTP;vSSL:TIdSSLIOHandlerSocket;vMemory:TMemoryStream;begintryvIdHTTP:=TIdHTTP.Create(nil);vSSL:=TIdSSLIOH…
类别:网络 标签: 作者:admin 日期:2015-05-12 09.41.43

delphi的TClientSocket组件和TserverSocket组件(C/S)说明

类别:网络 标签: 作者:admin 日期:2015-04-27 20.34.20

DELPHI IDHTTP下载带清理网络缓存

typeTHttpThread=class(TThread)privateFIdHTTP:TIdHTTP;FUrl:string;FSavePath:string;procedureDown(Url:string;SavePath:string);publicconstructorCreate(CreateSuspended:Boolean;Url:string;SavePath:&nbs...
类别:网络 标签: 作者:admin 日期:2015-04-27 20.21.58

delphi删除cookie和ie缓存

procedureDelRegCache;varreg:TRegistry;beginreg:=Tregistry.create;reg.RootKey:=HKEY_CURRENT_USER;reg.DeleteKey('SoftwareMicrosoftInternetExplorerTypedURLs');reg.Free;end;<br...
类别:网络 标签: 作者:admin 日期:2015-04-27 20.20.40

Delphi 正确得到本地IP

Indy的“indymisc”下有一个“TIdIPWatch”组件,可以正确获得本地IP,即使有多块网卡,也可以正确获得真正本地IP。一,引入单元文件“IdIPWatch”。二,实际代码:procedureTMainForm.localIpBtnClick(Sender:TObje…
类别:网络 标签: 作者:admin 日期:2015-04-27 20.17.51

Delphi IdHTTPServer使用注意问题

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

Delphi 快速检测是否联网

useWinInet;//正确检测是否在线方法ifInternetGetConnectedState(nil,0)thenbeginSelf.Caption:='在线';endelsebeginSelf.Caption:='脱机';end;经测试,和QQ检测是否在线基本相同。
类别:网络 标签: 作者:admin 日期:2015-04-27 20.16.41

Delphi中使用IXMLHTTPRequest如何用POST方式提交带参

说明:服务器端为JAVA,编码UTF-8,返回数据编码UTF-8;数据交换格式JSON。procedureTloginForm.loginBtnClick(Sender:TObject);varjo:ISuperObject;//JSON接口req:IXMLHTTPRequest;url:WideString;//要访问的urlpar…
类别:网络 标签: 作者:admin 日期:2015-04-27 20.13.10

delphi 网页数据抓取

方法一:WebBrowser1.Silent:=True;WebBrowser1.Navigate(URL);repeatApplication.ProcessMessages;untilWebBrowser1.ReadyState=READYSTATE_COMPLETE;WebBrowser1.Navigate('javascript:document.getElementById("d…
类别:网络 标签: 作者:admin 日期:2015-04-27 20.08.25

Delphi webservices传base64字串

functionCompressStrToBase64(sStr:string):string;varM1:TMemoryStream;M0,M2:TStringStream;beginResult:='';ifsStr=''thenExit;M0:=TStringStream.Create(sStr);M1:=TMemoryStream.Create;M2:=TStrin...
类别:网络 标签: 作者:admin 日期:2015-04-27 20.03.54

Delphi IdHttpServer实现webservice

朋友有个项目,通信协议使用HTTP,数据序列使用BIN(二进制)。他不知道要选用何种技术方案。RESTwebservice是http+json,SOAPwebservice是http+xml,好像都不适合。<pstyle="margin:10pxauto;padding:0px;color:#33…
类别:网络 标签: 作者:admin 日期:2015-04-27 19.47.22

Delphi 通用程序自动更新升级

1)服务端IIS网站上创建新的虚拟路径,给新创建的虚拟路径增加MIME类型:.bpl、.ini等。2)设置update.ini文件版本号配置文件[ver]config.ini=1bplCommon.bpl=1bplGoods.bpl=1bplPower.bpl=1bplPurchasing.bpl=1prjM…
类别:网络 标签: 作者:admin 日期:2015-04-27 19.40.07

Delphi 获取网页源代码的最简单办法

获取网页源代码的最简单办法,就是利用WinInet单元中的函数:usesWinInet;functionGetWebPage(constUrl:string):string;varSession,HttpFile:HINTERNET;szSizeBuffer:Pointer;dwLengthSizeBuffer:DWord;dwReserved:D…
类别:网络 标签: 作者:admin 日期:2015-04-25 22.35.06

Delphi XE6 实现Ping的功能

介绍本代码实现了windows的ping的功能,通过使用icmp.dll里的IcmpSendEcho()函数,来发送Ping命令,具体代码:functionTPing.PingHost(IP:string;varRTT:DWORD;TTL:Byte=64;TimeOut:DWORD=4000):Integer;var//IPOpti…
类别:网络 标签: 作者:admin 日期:2015-04-16 15.41.22

Delphi XE7写的一个http post的小测试程序

本文章介绍了DelphiXE7写的一个httppost的小测试程序,该程序是通过TIdHTTP组件进行post功能的测试,具体就不介绍了,代码很简单,下面是主要的代码unitUnit1;interfaceusesWinapi.Windows,Winapi.Messages,System.S…
类别:网络 标签: 作者:admin 日期:2015-04-16 14.55.27

Delphi 禁用本地网络连接/启用本地网络连接

代码如下://Unittogetthelocalnetworkconnectionlist//andenable/disablecorrespondnetworkconnection////Author:jhzhang@iflytek.com//History:2009/1/16Create//unituNetworkConnection;interfaceusesWindows,Mes…
类别:网络 标签: 作者:admin 日期:2014-08-15 07.54.53

delphi判断电脑连接到 Internet 了吗?

procedureCheckConnection;vardwFlags:DWORD;beginifInternetGetConnectedState(@dwFlags,0)thenbeginif(dwFlagsandINTERNET_CONNECTION_MODEM)=INTERNET_CONNECTION_MODEMthenShowMessage('Connectedthroughmodem')…
类别:网络 标签: 作者:admin 日期:2014-08-13 23.40.06