摘要: //设置IP和Port RemoteUdpConnection1.RemoteIp:=Edit1.Text; RemoteUdpConnection1.RemoteLoginPort:=StrToInt(Edit2.Text); RemoteUdpConnection1.RemoteDataPort:=StrToInt(Edit3.Text); //启动登陆(StartLogin属于非阻塞的方法) RemoteUdpConnection1.StartLogin;procedure TForm1.RemoteUdpConnection1Connect(OnLine: Boolean);//on. 阅读全文
posted @ 2008-07-22 16:20 delphi中间件 阅读(300) 评论(0) 推荐(0) 编辑