delphi 自定义网络函数：unit net
interface
uses
sysutils
,windows
,dialogs
,winsock
,classes
,comobj
,wininet
//得到本机的局域网ip地址
function getLocalIP(var LocalIP:string): boolean
//通过ip返回机器名
function getnamebyipaddr(ipaddr: string var macname: string): boolean
//获取网络中sqlserver列表
function getsqlserverlist(var list: tstringlist): boolean
//获取网络中的所有网络类型
function getnetlist(var list: tstringlist): boolean
//获取网络中的工作组
标签：
interface
sysutils
classes
dialogs
上传时间：
2015-05-09
上传用户：wanghui2438
