关于idftpserver 简单问题 用idftpserver 做了个简单ftp服务 想在接收文件完毕后 showmessage一下, 请问应该在哪写 怎么写 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 你是想在客户端,还是在服务端?如果是客户端,那么必须是从服务器返回接收完成标记,然后才可以。Object:IdTcpServer1:TIdTcpServer CommandHandlers=< item Command='execute' .... end;procedure TFormServer.IdTcpServer1TIdCommandHandler1Command(ASender:TIdCommand); //服务器begin ASender.Thread.Connection.Writeln('True');end;procedure TFormClient.BtnExecuteClick(Sender:TObject); //客户端begin IdTcpClient1.WriteLn('execute'); ShowMessage(IdTcpClient1.ReadLn);end; 怎么访问存储卡? 散分,登陆验证码11111 用 winsocket api 函数来做网络程序,服务端怎么判断客户端已经断开连接? 由程序自已来判断,如保知道DLL里有某个函数. 这么晚了,喝点可乐提提神 delphi中有没有和vb中doevents功能一样的函数? 创建立SQLServer数据库,用哪种办法好? 想做一个简单的FTP工具自己用~!不知道该怎么做。求教~~!!那里有现成了参考一下那就更好了~~ *.pdg文件使用什么工具打开呀?up有分! delphi ???treeview问题,有产品编码为类别+序号,请问如何生成树??? 求助剪贴板Unicode支持问题
如果是客户端,那么必须是从服务器返回接收完成标记,然后才可以。Object:IdTcpServer1:TIdTcpServer
CommandHandlers=<
item
Command='execute'
....
end;
procedure TFormServer.IdTcpServer1TIdCommandHandler1Command(ASender:TIdCommand); //服务器
begin
ASender.Thread.Connection.Writeln('True');
end;procedure TFormClient.BtnExecuteClick(Sender:TObject); //客户端
begin
IdTcpClient1.WriteLn('execute');
ShowMessage(IdTcpClient1.ReadLn);
end;