================= 选择一个网路邻居 ===================== function SelectComputerName(handle: hwnd; var ComputerName: string): boolean; var BrowseInfo: TBrowseInfo; ItemIDList: PItemIDList; cName: array[0..MAX_PATH] of Char; Title: string; WindowList: Pointer; begin if Fail...[ 查看全文 ]