Browse Computers(Terminals) on Network

Hi,
I'm using the following code to display computers on my office network:
void __fastcall TFormMain::GetNetworkComputors()
{

LPNETRESOURCE lpnr=0;
DWORD dw;
DWORD size;
size=2056;
dw=0xffffffff;
HANDLE lp;
char* mstr;
//enumerating computers in the workgroup (or domain)
if (WNetOpenEnum(RESOURCE_CONTEXT ,RESOURCETYPE_DISK ,0, lpnr ,&lp) == NO_ERROR) {
lpnr=(LPNETRESOURCE)GlobalAlloc(GPTR,size);
WNetEnumResource(lp,&dw, lpnr,&size) ;
for(unsigned int i=1;i<dw;++i) {
mstr=(char*)(((NETRESOURCE)lpnr[i]).lpRemoteName) ;
mstr+=2;//adjust the pointer
if (!AnsiCompareText(mstr,ServerSocket->Socket->LocalHost))
continue;
CheckListBox1->Items->Add(mstr/*((NETRESOURCE)lpnr[i]).lpRemoteName*/); }
GlobalFree((HGLOBAL) lpnr);
WNetCloseEnum(lp);

}
else
ShowError(GetLastError());
}

Note that I'm using TServerSocket VCL class just to remove the name of my local computer from the computers' list. Other then that it is all Win32 API and is supported under Win9x, Win2x and win xp and probably some others