2009年9月1日
Delphi 中取本机的计算机名、IP地址、Windows登录的用户名
摘要： //取本机的 IP 地址function ComputerLocalIP: string;var ch: array[1..32] of char; wsData: TWSAData; myHost: PHostEnt; i: integer;begin Result := '';if WSAstartup(2,wsData)<>0 then Exit; // can’t ... 阅读全文
posted @ 2009-09-01 09:48 novel 阅读(564) 评论(0) 推荐(0)