方法1：推荐方便。 System.Hash 单元 Memo1.Lines.Add(THash.GetRandomString(50)); 方法二（自己写的）： PK结果，效率差不多。: http://www.cnblogs.com/del88/p/6911709.html Read More
{ 功 能: 网络函数库时 间: 2002/10/02版 本: 1.0 }unit Net;interfaceusesSysUtils,Windows,dialogs,winsock,Classes,ComObj,WinInet;//得到本机的局域网Ip地址Function GetLocalIp(v Read More