ClientSocket控件的使用? SendText('helo');中的串尾要空格!SendText('helo ');是不是要改成同步方式 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 改成同步就可以,不过你也可以在ClientSocket的OnConnected下写SendText这主要是因为,Active需要较长的时间,而默认的异步方式,并没有等Active完成就执行了SentText,你会发现SentText的返回值一直是0。 ClientSocket.ClientType := ctBlocking;也可以直接在object inspector中改 还是没收到?ClientSocket1.ClientType:=ctBlocking; 太夸张了,我这边可以,不知道你那边是怎么回事。我在一开始就在object inspector把ClientSocket设置成ctBlocking然后在btn的Click下ClientSocket.Active := true;Clientsocket.Socket.SentText('hello');很简单。你自己再试试吧,再不行我也帮不了你了 谢谢各位,我现在改用IdTCPClient可以收到了。现在的问题是:如何创建多线程来调用IdTCPClient的发送,因为如果是单线程的话,一个正在发送时,另一个就把它Disconnect,就出错了。 用IdTCPClient如何通过smtp服务认证?IdTCPClient1.Host:='smtp.sina.com.cn';IdTCPClient1.Port:=25;IdTCPClient1.Connect;IdTCPClient1.SendCmd('helo');IdTCPClient1.SendCmd('mail from:<[email protected]>');IdTCPClient1.SendCmd('rcpt to:<[email protected]>');IdTCPClient1.SendCmd('data');IdTCPClient1.WriteFile('1.eml',true);IdTCPClient1.SendCmd('.');IdTCPClient1.DisconnectSocket; 关于多线程,你看看DELPHI的例子就可以了 请教各位大侠,dbgrideh 如何给ORACLE 数据库做个CHECK选择 热键! 很急的问题(在线) 求界面说明书一份 delphi网络版软件,帮忙呀--------解决问题既给分(破产了) delphi6.0的report 问题 从前未接触Delphi是否可能在半个月内达到一定的开发水平? 为什么在D6的VCL代码中找不到tobject的代码,希望可以研究这东西的代码 鼠标右键退出服务 格式化字符串的问题 MTS調試問題! 我也想自己做一个OICQ,但在Delphi里应该用什么控件比较好呢?
这主要是因为,Active需要较长的时间,而默认的异步方式,并没有等Active完成就执行了
SentText,你会发现SentText的返回值一直是0。
也可以直接在object inspector中改
ClientSocket1.ClientType:=ctBlocking;
我这边可以,不知道你那边是怎么回事。
我在一开始就在object inspector把ClientSocket设置成ctBlocking
然后在btn的Click下
ClientSocket.Active := true;
Clientsocket.Socket.SentText('hello');
很简单。
你自己再试试吧,再不行我也帮不了你了
现在的问题是:
如何创建多线程来调用IdTCPClient的发送,因为如果是单线程的话,一个正在发送时,另一个就把它Disconnect,就出错了。
IdTCPClient1.Host:='smtp.sina.com.cn';
IdTCPClient1.Port:=25;
IdTCPClient1.Connect;
IdTCPClient1.SendCmd('helo');
IdTCPClient1.SendCmd('mail from:<[email protected]>');
IdTCPClient1.SendCmd('rcpt to:<[email protected]>');
IdTCPClient1.SendCmd('data');
IdTCPClient1.WriteFile('1.eml',true);
IdTCPClient1.SendCmd('.');
IdTCPClient1.DisconnectSocket;