查看会员资料
用 户 名：655***
发送消息- Email：用户隐藏
- Icq/MSN：
- 电话号码：
- Homepage：
- 会员简介：
最新会员发布资源
707s
- ShowMessage( 对不起，目前只能处理向下查找。 ) Edit1.text:=TcpServer1.LocalHostAddr //"TcpServer1"获取本机IP --Internet-10 控件 Edit1.text:=TcpServer1.LocalDomainName //"TcpServer1"获取本机计算机名 --Internet-10 控件 edit1.Text:=DateToStr(Month.Date) //(Month.Date)为 Win3