如何用TClientSocket和TServerSocket实现自定义数据结构的收发？

Question

比如，如何收发记录数据；记录格式如下：
USR=Record
      id:String;
      name:String;
      PWD:String;
   end;

Answer 1

一般可以的，没问题，
挺好用：好像sendbuffer(结构指针，长度，长度)
不过这个长度要注意，如果你用的是char，往往用length 得出的结果不准！呵呵，可能是我菜才有这样的问题

Answer 2

记录中不能用string类型,string只是一个指针
TMyRecord=record
  MyName : array[0..20]of Char;
end;var
buf : TMyRecord
begin
  Socket.SendBuffer(buf,sizeof(TMyRecord));
end;
这样就行了.

Answer 3

或
TMyRecord=record
     id : integer;
     Name : string[20];
end;

Answer 4

结构体中的类型改成char型的，用sendbuffer发送,接收方定义相同的结构体或使用一个大的数组接收

Answer 5

TMyRecord1=record
  MyName1 : string[10];
end;TMyRecord2=record
  MyName2 : array[0..20]of Char;
end;TMyRecord=record
  head :TMyrecord1;
  name :TMyrecord2;
end;
var
buf : TMyRecord
begin
  Socket.SendBuf(buf,sizeof(TMyRecord));
end;