文件名称:FindAllComputers
下载
别用迅雷、360浏览器下载。
如迅雷强制弹出，可右键点击选“另存为”。
失败请重下，重下不扣分。
如迅雷强制弹出，可右键点击选“另存为”。
失败请重下，重下不扣分。
介绍说明－－下载内容均来自于网络，请自行研究使用
procedure FindAllComputers(Workgroup: string)
var
EnumHandle: THandle
WorkgroupRS: TNetResource
Buf: array[1..500] of TNetResource
BufSize: Integer
Entries: Integer
Result: Integer
var
EnumHandle: THandle
WorkgroupRS: TNetResource
Buf: array[1..500] of TNetResource
BufSize: Integer
Entries: Integer
Result: Integer
(系统自动生成,下载前可以参看下载内容)
下载文件列表
FindAllComputers.pas