delphi 自定義網(wǎng)絡(luò)函數(shù)：unit net
interface
uses
sysutils
,windows
,dialogs
,winsock
,classes
,comobj
,wininet
//得到本機(jī)的局域網(wǎng)ip地址
function getlocalip(var localip:string): boolean
//通過ip返回機(jī)器名
function getnamebyipaddr(ipaddr: string var macname: string): boolean
//獲取網(wǎng)絡(luò)中sqlserver列表
function getsqlserverlist(var list: tstringlist): boolean
//獲取網(wǎng)絡(luò)中的所有網(wǎng)絡(luò)類型
function getnetlist(var list: tstringlist): boolean
//獲取網(wǎng)絡(luò)中的工作組
標(biāo)簽：
interface
sysutils
classes
dialogs
上傳時(shí)間：
2015-05-09
上傳用戶：wanghui2438
