GetInt64Prop返回值问题

Question

环境：
Delphi 2007
代码：procedure TFrmMain.test1Click(Sender: TObject);
begin
  ShowMessage(IntToStr(GetInt64Prop(FrmMain,'Tag'))); //Tag=12
end;结果：无法得到正确结果，怎么回事。

Answer 1

为什么不用GetOrdProp而要用GetInt64Prop

Answer 2

多谢Harryfin。不知道还有GetOrdProp，GetInt64Prop也是在dhibernate中才知道有这个函数，它里边这么用的:)

Answer 3

因为integer这种类型和int64是不停的

Answer 4

GetOrdProp和GetInt64Prop的实现方式是不一样的，你可以看看TypInfo单元中对这两个函数的实现过程！