码迷,mamicode.com
首页 > Windows程序 > 详细

Delphi中比较两个对象是否一致及地址是否相同[转]

时间:2018-06-30 17:41:24      阅读:219      评论:0      收藏:0      [点我收藏+]

标签:blog   cli   for   一个   区别   phi   btn   sam   end   

在delphi中,C#也是如此,对象的地址与对象变量(引用)的地址不是同一个概念。要加以区别。

 

procedure TForm1.btn1Click(Sender: TObject);

var
    p1:   Pointer;
    p2:   Pointer;
begin
    if   TObject(btn1)   =   TObject(btn2)   then   ShowMessage( ‘The   same   as ‘)
    else   ShowMessage( ‘Dfferent ‘);
    p1   :=   @btn1;
    P2   :=   @btn2;
    if   p1   =   p2   then     ShowMessage( ‘The   same   as ‘)
    else   ShowMessage( ‘Dfferent ‘);
end;

转自:https://blog.csdn.net/diligentcatrich/article/details/7077294

Delphi中比较两个对象是否一致及地址是否相同[转]

标签:blog   cli   for   一个   区别   phi   btn   sam   end   

原文地址:https://www.cnblogs.com/railgunman/p/9247849.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!