UDP发送中文

最新推荐文章于 2022-06-16 17:47:16 发布

weixin_30802273

最新推荐文章于 2022-06-16 17:47:16 发布

阅读量620

点赞数

文章标签：网络

原文链接：http://www.cnblogs.com/studypanp/p/5051986.html

版权

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
	udp.Send('localhost', 1234, 'abc123'); // 发送字符， 这样发中文接收方会乱码
end;

procedure TForm1.SpeedButton2Click(Sender: TObject);
var
	b: TBytes;
	s: string;
begin
	s := '你好';
	b := BytesOf(s);
	udp.SendBuffer('localhost', 1234, TIdBytes(b));  // TIdBytes要引用IdGlobal.pas单元
end;

转载于:https://www.cnblogs.com/studypanp/p/5051986.html