高手请进.(30分)

各位先看如下代码:
var
StrData:Array Of Char; //定义动态数组
StrSize,A:Integer; //定义字符串长度
Str,B:String; //定义字符串

buttonclick:

Str:='ABCDEFG';
StrSize:=Length(Str);
SetLength(StrData,SizeOf(Integer)+StrSize);

Copymemory(@StrData[0],@StrSize,SizeOf(Integer));
Copymemory(@StrData[SizeOf(Integer)],@Str,StrSize);
Copymemory(@A,@StrData[0],SizeOf(Integer));
Copymemory(@B,@StrData[Sizeof(Integer)],StrSize);
ShowMessage(Vartostr(A));
ShowMessage(Vartostr(B));
Idudpclient1.SendBuffer(Strdata,Length(StrData));//发送数据

我从本地用CompMemory这个函数将数据显示出来没问题,但是用UDP组件在网络上传输接收下来再显示数据就不对了.请各位指点.

大侠们帮帮忙吧.

你把 Idudpclient1.SendBuffer(Strdata,Length(StrData));//发送数据
改成 Idudpclient1.SendBuffer(Strdata[0],Length(StrData));//发送数据
就可以了.

接受答案了.