Delphi XE5、6、7在Android或者IOS上使用AnsiString和An

Delphi XE5、6、7在Android或者IOS上使用AnsiString和An

浏览次数:89 发布时间:2015-09-01

介绍 本文章介绍了DelphiXE5、6、7在Android或者IOS上使用AnsiString和AnsiChar,在移动平台上面,一般都是使用String类型来处理数据,但是很多老的代码就无法在移动上使用,因为老的String是...

delphi判断电脑连接到Internet包含代码

delphi判断电脑连接到Internet包含代码

浏览次数:101 发布时间:2015-09-27

procedureCheckConnection; var dwFlags:DWORD; begin ifInternetGetConnectedState(@dwFlags,0)thenbegin if(dwFlagsandINTERNET_CONNECTION_MODEM)=INTERNET_CONNECTION_MODEMthen ShowMessage('Connectedthroughmodem') elseif(dwFlagsandINTERNET_CONNECT...

Delphi XE5 实现获取本地的IP地址

Delphi XE5 实现获取本地的IP地址

浏览次数:86 发布时间:2015-09-27

介绍 本文章介绍了通过Delphi XE5 实现获取本地的IP地址,在使用代码之前,需要引用winsock单元,目前测试了获取IP4没问题,但是并没有测试获取IP6是否有问题,大家可以试试,有结果的...

Delphi提取网页中的图片

Delphi提取网页中的图片

浏览次数:69 发布时间:2013-09-09

无意中,在csdn论坛中看到关于“提取网页中的图片资源”的帖子,特摘抄之。 astyle="font:bold12px/24pxHelvetica,Tahoma,Arial,sans-serif;text-align:left;color:rgb(51,90,164);text-transform:none;text-indent:0px;let...

Delphi中提取网页源代码

Delphi中提取网页源代码

浏览次数:75 发布时间:2011-07-13

1.用idhttp const URL='http://www.3464.com'; begin memo1.lines.text:=idhttp1.get(URL); end; 2.用webbrowser //只获取到内的源码 const URL='http://www.4936.cn'; begin webbrowser1.Navigate(URL); whileWebBrowser1.Busydo Application.Proc...

DELPHI获取网卡MAC地址

DELPHI获取网卡MAC地址

浏览次数:69 发布时间:2013-03-22

1、通过IP取MAC地址 uses WinSock; Function sendarp(ipaddr:ulong; temp:dword; ulmacaddr:pointer; ulmacaddrleng:pointer) : DWord; StdCall; External 'Iphlpapi.dll' Name 'SendARP'; procedure TForm1.Button1Click(Sender: TObject); var myip:u...

Delphi实现WebService带身份认证的数据传输

Delphi实现WebService带身份认证的数据传输

浏览次数:73 发布时间:2013-01-10

WebService使得不同开发工具开发出来的程序可以在网络连通的环境下相互通信,它最大的特点就是标准化(基于XML的一系列标准)带来的跨平台、跨开发工具的通用性,基于HTTP带来的畅...

delphi 获取外网IP的函数

delphi 获取外网IP的函数

浏览次数:76 发布时间:2014-01-06

获取外网IP的函数 function GetIP: string; var r: string; p1, p2: Integer; begin r := idhttp1.get('http://www.net.cn/static/customercare/yourIP.asp'); p1 := Pos('h2', r); // 找到 h2 标签 p2 := Pos('/h2', r); // 找到 h2 结束标签...

delphi 实现文件上传下载

delphi 实现文件上传下载

浏览次数:79 发布时间:2013-06-06

delphi 实现文件上传下载 unit UpDownFile; interface uses Windows, Classes, Idhttp, URLMon, IdMultipartFormData; const UpUrl = 'http://127.0.0.1/upfile/upfile.asp'; const UpFileName = 'C:\Documents and Settings\Administrator\桌面\te...

delphi检测网络连接状态

delphi检测网络连接状态

浏览次数:68 发布时间:2013-07-24

为方便网络编程的朋友给自己的程序获得洞查 internet 的连接与否状态,以便为自动运行提供指示。QQ 不知道为什么没有使用这个函数,而 MSN 、ICQ却早就在使用了。这个片段中,还是自...