Z
zdouble
Unregistered / Unconfirmed
GUEST, unregistred user!
代码如下:
procedure TMain.IdUDPServerUDPRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);
begin
AData.Seek(0,soFromBeginning);
[red]XMLDocument.LoadFromStream(AData,xetUnknown);[/red]
……//判断等工作
XMLDocument.LoadFromFile('./b.xml');
XMLDocument.SaveToStream(AData);
ABinding.SendTo(ABinding.PeerIP,ABinding.PeerPort,AData,AData.Size);
end
问题有两个:
1.有时候收到的数据包里有中文,如<Name>里斯本</Name>等,程序在LoadFromStream一句会报错,我不知该怎么处理,请教各位。
2.功能要求将b.xml文件作为响应包发回,b.xml是一个回复包,不含中文,变化很小。如上代码有没有问题?为什么对方说总收到乱码?问题出在我这里还是他哪里?
谢谢
procedure TMain.IdUDPServerUDPRead(Sender: TObject; AData: TStream;
ABinding: TIdSocketHandle);
begin
AData.Seek(0,soFromBeginning);
[red]XMLDocument.LoadFromStream(AData,xetUnknown);[/red]
……//判断等工作
XMLDocument.LoadFromFile('./b.xml');
XMLDocument.SaveToStream(AData);
ABinding.SendTo(ABinding.PeerIP,ABinding.PeerPort,AData,AData.Size);
end
问题有两个:
1.有时候收到的数据包里有中文,如<Name>里斯本</Name>等,程序在LoadFromStream一句会报错,我不知该怎么处理,请教各位。
2.功能要求将b.xml文件作为响应包发回,b.xml是一个回复包,不含中文,变化很小。如上代码有没有问题?为什么对方说总收到乱码?问题出在我这里还是他哪里?
谢谢