教程-Delphi中比较两个对象是否一致及地址是否相同
2023-09-14 08:57:11 时间
资料说明:
1.http://blog.csdn.net/diligentcatrich/article/details/7077294
说明:
实例代码:
1 procedure TForm1.btn1Click(Sender: TObject); 2 var 3 p1: Pointer; 4 p2: Pointer; 5 begin 6 if TObject(btn1) = TObject(btn2) then 7 ShowMessage('The same as') 8 else 9 ShowMessage('Dfferent'); 10 p1 := @btn1; 11 P2 := @btn2; 12 if p1 = p2 then 13 ShowMessage('The same as') 14 else 15 ShowMessage('Dfferent'); 16 end;
备注:
相关文章
- 37张图详解MAC地址、以太网、二层转发、VLAN
- Adobe Acrobat DC 2015 PDF编辑软件安装教程—附下载地址PDF编辑器全版本下载
- Photoshop CS2软件下载地址及安装教程(mac+windows全版本PS,包括最新2023)
- PE格式:VA地址与FOA地址
- Auto CAD2018软件下载地址及安装教程--cad所有版本!
- AutoCAD2004软件下载地址及安装教程--cad所有版本!
- Photoshop PS 2021软件安装教程 PS全版本软件下载地址(包括最新的2023)
- Photoshop 2020安装教程 PS全版本软件下载地址(包括最新的2023)
- Adobe Photoshop CC2018软件安装教程 PS全版本软件下载地址(包括最新的2023
- DPDK-vpp 一次mbuf地址被踩的定位思路
- 原来PS软件装不上,告诉你一个问题PS全版本软件下载地址(包括最新的2023)
- 全版本pr(Premiere软件)下载地址(包括最新的2023版本)安装教程
- Adobe After Effects 2023最新安装教程-Ae软件全版本下载地址
- Adobe Acrobat DC 2021软件安装教程-pdf编辑器全版本下载地址
- Autocad 2023软件安装教程+安装包-cad软件全版本下载地址
- Adobe Acrobat DC 2021软件安装教程-pdf编辑器全版本下载地址
- Office 2016-2013软件下载安装教程-office全版本软件下载地址
- Autocad 2023软件下载安装教程-cad软件全版本下载地址
- 空间 探索Linux:查看进程地址空间(linux查看进程地址)
- Oracle付款地址变更值得关注(oracle 付款地址)
- 英仙座流星雨迎极大 每小时可达数百颗肉眼可见:附直播观看地址
- oracle与mysql的视频教程下载地址分享