Question

delphi 记录类型 如何定义为常量、赋值、作为参数等

delphi 记录类型 如何定义为常量、赋值、作为参数等

Answer 1

type
  PMyRec = ^TMyRec;
  TMyRec = record
    Val1: Integer;
  end;
  
const
  CMyRec: TMyRec = (Val1: 10);
  
procedure ProcessRec(const ARec: TMyRec); // 加const指示符以指针形式传进来，否则是复制
begin
  GlobalVal1 := ARec.Val1;...
end;