如何把一个 记录类型 转成 字符串呢?

Question

如果结构体里有各种不同的变量,我现在把它转成string 怎么转呢?
比如 这个结构体:   type=record
              a:integer;
              b:array[0..255] of char;
                  end;
把它转成string型怎么实现呢?

Answer 1

我想把这个结构体转成字符串再发送出去~
我自己这样子写了
type
testdat=record
  a:integer;
  b:array[0..255] of char;
  end;aaa:testdat;
s:^char;然后
s:=(^char)@aaa;
系统会报错~
请教下~正确的思路应该是啥呢~

Answer 2

type
  Ta = record
    a:integer;
    b:array[0..255] of char;
  end;procedure TForm1.Button1Click(Sender: TObject);
var
  A, B: Ta;
  Str: string;
begin
  A.a := 30;
  A.b := 'test';  SetLength(Str, SizeOf(A));
  Move(A, Str[1], SizeOf(A)); // 从A拷贝至字符串  Move(Str[1], B, SizeOf(B)); // 从字符串拷贝至B
  ShowMessage(B.b);
end;

Answer 3

[Quote=引用 2 楼 miles_wei 的回复:]
我想把这个结构体转成字符串再发送出去~
还以为你干啥呢，网络直接发送结构体就好了。

Answer 4

可以把任何内存块按base64编码为字符串