ftp问题(20分)

  • 主题发起人 主题发起人 moneytea
  • 开始时间 开始时间
M

moneytea

Unregistered / Unconfirmed
GUEST, unregistred user!
我在使用nmftp控件的时候,F9运行如果ftp可以连接上则没有问题,
但是如果ftp当了,下面的程序并没有象我想象的
那样showmessage('Sorry,Can not connect the Server!');
而是进入了debug状态,我要用ctrl+F2中止。
怎么回事呢?
try
nmftp1.Connect
except
showmessage('Sorry,Can not connect the Server!');
end;
//nmftp1.ChangeDir('soft');
 
NM的东西问题多,建议你换,不过换之前你可以看看NMFTP是否有ConnectFail之类的事件,写相应的事情代码实现你的意图
 
要这样写:
try
nmftp1.Connect
except
exit;
end;

procedure TForm1.NMFTP1ConnectionFailed(Sender: TObject);
begin
showmessage('Sorry,Can not connect the Server!');
end;
 
接受答案了.
 
后退
顶部