DataModule2.SocketConnection1.Connected := false;  这个语句有问题吗,为何一运到这里就报错。。。在

  • 主题发起人 主题发起人 jcdear
  • 开始时间 开始时间
J

jcdear

Unregistered / Unconfirmed
GUEST, unregistred user!
DataModule2.SocketConnection1.Connected := false;  这个语句有问题吗,为何一运到这里就报错。。。在线等侍。。。(10分)<br /> DataModule2.SocketConnection1.Connected := false;
DataModule2.SocketConnection1.Host := edtAppHost.text;
DataModule2.SocketConnection1.Address := edtAppIP.text;
DataModule2.SocketConnection1.Port := strtoint(edtPort.text);
  这个语句有问题吗,为何一运到这里就报错。。。
 
你为什么要自己来做呢?
 
要做一个设置ip及port的窗体,让用户可以自已设置。。。
 
ClientSocket.Close;
再执行你下面的程序。
 
不行呀,已经试过了,另外我要说的是:
我的ClientSocket在DataModule(数据模块里),而调用是在另外的一个页面。。。
调用语句:
DataModule2.SocketConnection1.Connected := false;
DataModule2.SocketConnection1.Host := edtAppHost.text;
DataModule2.SocketConnection1.Address := edtAppIP.text;
DataModule2.SocketConnection1.Port := strtoint(edtPort.text);
会不会因为这个而出错,或者还需设置什么地方,请指点。。
 
所以呀这样不行吗?
DataModule2.ClientSocket.Close;
DataModule2.SocketConnection1.Connected := false;
DataModule2.SocketConnection1.Host := edtAppHost.text;
DataModule2.SocketConnection1.Address := edtAppIP.text;
DataModule2.SocketConnection1.Port := strtoint(edtPort.text);
 
呵呵。。
把dataModule2,的创建在此form之前。。试试
 
你没有创建dataModule2吧?
 
后退
顶部