Delphi 中记录类型 给记录指针赋值。

  PPersion=^TPersion;
  TPersion=packed record
     Name:string;
     Sex:string;
     Clasee:string;
  end;

 

 


var
  persion:TPersion;
  PP:PPersion;

begin

   FillChar(persion,SizeOf(TPersion),0);
   persion.Name:=liujicai ;
   persion.Sex:=2;
   persion.Clasee:=1;
   New(pp);
   pp^:=persion;

   ShowMessage(pp.Name);
   Dispose(PP);

end;

 

Delphi 中记录类型 给记录指针赋值。

上一篇:Windows电脑多个SSH Key管理.md


下一篇:yamlapi接口测试框架