给你一个完整例子:
发送端:
var
i : Word;
str : String;
Begin
str := 'My Data Packet';
i := Length(str);
move( i , buffer[0], sizeof(word) );
move( str[0], buffer[sizeof(word)], i );
socket.sendbuf( buffer, 1024 );
End;
接收端:
var
i : Word;
str : String;
Begin
socket.recvbuf( buffer, 1024 );
move( buffer[0], i, sizeof(word) );
SetLength( str, i );
move( buffer[sizeof(word)], str[0], i );
End;
这类问题关键是要搞清不同类型的数据在内存中的存储表示。