C ---> Delphi 数据转换

Question

写一个函数吧，嘿嘿 const
  kf32FsysAggregate   =     $0010;function TFsysAggredate(a: integer):integer;
begin
  result := a and kf32FsysAggregate;
end;

Answer 1

KXY:
define TFsysPushdown(a)        (False(TFsysAggregate(a)))
please!

Answer 2

function TFsysAggredate(a: integer):boolean;
begin
  result := boolean(a and kf32FsysAggregate);
end;

Answer 3

windindance:
   希望你能测试你的代码！