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

DELPHI发送邮件源代码

Delphi发送邮件源代码测试环境Delphi10.1Berlin和Delphi7主要控件为indy中IdSMTP和IdMessage主要代码:procedureTForm1.SendMail;beginif(Edit1.Text='')or(Edit2.Text='')or(Edit3.Text='')thenshowmessage('请完整…
类别:网络 标签: 作者:admin 日期:2017-01-25 21.41.54

Delphi保存网页中的图片

1.获取网页中的静态图片网页中的静态图片加载后会保存在IE缓存区内,所以只要获取图片URL在IE缓存区中对应的本地文件名,就可以使用Win32API函数:CopyFile拷贝到指定的文件名就可以了,获取URL对应本地文件名的函数…
类别:网络 标签: 作者:admin 日期:2016-01-26 22.10.16

Delphi发送邮件

1.在窗体上添加一个TidSMTP控件(在IndvClients页)和一个TidMessage控件(在IndvMisc页)。2.编写代码procedureTForm1.Button1Click(Sender:TObject);beginidSMTP1.Host:='smtp.163.com';//邮件发送服务器tryidSM…
类别:网络 标签: 作者:admin 日期:2016-01-26 22.09.40

delphi 使用WebBrowser控件获取含框架的网页的完整HTML代码

使用WebBrowser控件获取网页源码的方法,网上有很多介绍,但绝大多数的人都是使用以下的方法获取:(WebBrowser1.DocumentasIHtmlDocument2).body.outerHtml;我以前也是这么用的,这种方法的美中不足就是只能获取网页…
类别:网络 标签: 作者:admin 日期:2016-01-26 22.08.37

delphi 获取含跨域网址的框架网页的源码

前面介绍过的获取框架网页的源码的方法在针对框架中每个文档的URL都是和主网页在同一个域名(同一个网站)的情况下是不会出什么问题的,但如果框架包含的网页是别的域的话,例如以下网页:该网页含左右两个框架,都包…
类别:网络 标签: 作者:admin 日期:2016-01-26 22.07.54

Delphi通过URL获取网页源码

一个直接通过URL获取网页源码的例子,与使用TWebbrowser获取网页源码不同,该方法的优点是不需要加载网页直接获取HTML代码,如果网页中图片和媒体较多,使用TWebbrowser加载网页然后再获取源码速度就太慢了,该方法也…
类别:网络 标签: 作者:admin 日期:2016-01-26 22.03.50

Delphi下载指定网址(URL)的文件,带进度条显示

主要使用的是Delphi自带的TIdhttp控件。一、界面设置在窗体上放置两个TEdit控件,一个用于输入要下载的文件URL,一个用于输入要保存到本地的文件路径;放置两个TLabel控件,一个显示文件总大小,一个显示当前已下载大…
类别:网络 标签: 作者:admin 日期:2016-01-26 22.02.18

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