+ -
当前位置:首页 → 问答吧 → 请问delphi中的record结构怎样初始化

请问delphi中的record结构怎样初始化

时间:2011-10-26

来源:互联网

初学delphi,请大家帮忙看看
...
A record =
  name : string;
  sex :string
  age :Integer;
end;
...

(* 函数定义 *)
function :boolean;
var
  emp1 : A;
begin
  fillchar(emp1,sizeof(A));
end;

问题:我初始化emp1 结构体,如何才能初始化其每一个成员都为系统的默认值?
  (Setlength() 指适合于数组变量,fillchar使整个变量内容都不见了) 

作者: wenzhy   发布时间: 2011-10-26

type 
PMyRecord = ^TMyRecord; 
TMyRecord = record 
I: Integer; 
end; 


var 
R: PMyRecord; 


New(R); // 正确将 R 初始化 
Dispose(R); // 正确释放 R 内存空间 


作者: funxu   发布时间: 2011-10-26

zeromeory

作者: truexf   发布时间: 2011-10-26

引用 2 楼 truexf 的回复:
zeromeory

zeromemory 是填0不是释放吧

作者: funxu   发布时间: 2011-10-26

不能用ZeroMemory、FillChar来初始化

作者: SQLDebug_Fan   发布时间: 2011-10-26

会有内存泄漏,最好是手动一个一个初始化。

作者: SQLDebug_Fan   发布时间: 2011-10-26