关于强制类型转换的问题。

Question

有一个自定义的记录BCP_MSG，
声明了一个该记录类型的指针my_bcp_msg: ^BCP_MSG，
现想把Integer类型的变量MyMsg.lParam通过强制类型转换赋给my_bcp_msg，
C中的语句是：my_bcp_msg = (BCP_MSG*)(MyMsg.lParam)，
小弟初学Delphi，不知对应的语句怎么写。
请大家指点，谢谢！ 

Answer 1

可以这样写:my_bcp_msg := Pointer(MyMsg.lParam);
不过, 建议改成下面的写法:type
  BCP_MSG = record
    ......
  end;
  TBCP_MSG = ^BCP_MSG;var
  my_bcp_msg: TBCP_MSG;......  my_bcp_msg := TBCP_MSG(MyMsg.lParam);