- @cntlis
这个例子不好,即使你运行的结果看上去正确,也不代表它真的正确。从接口获取对象实例应该是从D2010才有的,里面用的trick就是我说的那个,之前的版本一般采用的都是一个老外写的方法。
建议你再写个demo,好好玩玩:) - 楼主说得很对,就像我们看你这篇文章的时候也应如此:)
我猜到你说的某君写文章的时候应该用的是低版本的Delphi。
FTDemo:= TDemo1(FIDemo); //接口再转回类
如果你再深入下,看看接口转换成对象实例背后的原理就懂了。
P.S. 这个并不是简单的转换指针,而是编译器传入一个特别的GUID给QueryInterface来获取对象引用地址。你去看看TObject.GetInterface吧 - 提醒一下,下面这句很邪恶,用之前一定要搞清楚。。。
Application.ProcessMessages;










