commontype.inc

来自「纵横天地(开源) Delphi的功能很多``很值得大家学习」· INC 代码 · 共 6 行

 P1_STR = packed record
    Param1: Integer;
    Param2: Integer;
    Param3: Integer;
 end;
 PP1_STR = ^P1_STR;