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