徐
徐海懿
Unregistered / Unconfirmed
GUEST, unregistred user!
例如
my=record
filesize:Integer;
strsize:Integer;
commandtype:Integer;
ff:string;
end;
var
v:my;
begin
ShowMessage(IntToStr(sizeof(v)));
v.commandtype:=123;
v.filesize:=23;
v.strsize:=444;
v.ff:='aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa';
ShowMessage(IntToStr(sizeof(v)));
end;
似乎不管v.ff的字符串有多长 size始终只是16, 这是为什么?
而且我把v放入某个文件后面, 读出来也不出错,
my=record
filesize:Integer;
strsize:Integer;
commandtype:Integer;
ff:string;
end;
var
v:my;
begin
ShowMessage(IntToStr(sizeof(v)));
v.commandtype:=123;
v.filesize:=23;
v.strsize:=444;
v.ff:='aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa';
ShowMessage(IntToStr(sizeof(v)));
end;
似乎不管v.ff的字符串有多长 size始终只是16, 这是为什么?
而且我把v放入某个文件后面, 读出来也不出错,