关于delphi程序中怎么样实现换行(50分)

  • 主题发起人 主题发起人 wangwsu
  • 开始时间 开始时间
W

wangwsu

Unregistered / Unconfirmed
GUEST, unregistred user!
我在开发一个聊天程序中遇到一个问题,就是在delphi的字符串中实现换行功能
 
在需要的时候加#13就可以了;
 
我用过但是不行,我的源码
clientsocket1.Socket.SendText(data+' '+username+#13);
运行后功能不能实现
 
clientsocket1.Socket.SendText(data+' '+username+#13+#10);
 
我觉得要看你的服务器端用的是什么操作系统譬如:
Unix和Windows的换行是不同的,
Windows :clientsocket1.Socket.SendText(data+' '+username+#13+#10);
Unix:clientsocket1.Socket.SendText(data+' '+username+#13);
忘了具体是什么自己试一试 反正用#13或者#10或者两个一起来!

 
在Unix下必须以#13#10,在windows下#13即可。
 
这个问题我也遇到过
先定义一个函数:
把要输出的格式定义好
附值给一个变量
在net.exe send ###.###.###.### '***'就OK 了
 
Socket.SendText 是不是对 #13 不处理呀。
你在显示的时候再加上 #13 就可以了
Memo1.Text := ReceiveString + #13;
 
s1+'#13'+s2 就可以了
 
接受答案了.
 
后退
顶部