http://www.csdn.net/develop/article/10/10124.shtm
-
等级
本版专家分：2800结帖率 100% -
敬请关注《Object Pascal：从对象指针谈起》，参与讨论。
http://www.csdn.net/develop/article/10/10124.shtm
展开阅读全文
-
等级
本版专家分：2391
-
去看看
-
等级
本版专家分：2389
-
关注
-
等级
本版专家分：2800
-
正在热烈讨论，欢迎大家参与，提出自己的见解。
也希望给大家一些启发。
敬请关注《Object Pascal：从对象指针谈起》，参与讨论。
http://www.csdn.net/develop/article/10/10124.shtm
-
等级
本版专家分：2800
-
有点卖狗皮膏药之嫌。
但是既然文章已经写成，当然要听听大家的看法，不为过吧？
-
等级
本版专家分：2800
-
**********************
Nicrosoft (2001-8-28 23:39:08)
Form := TForm(Obj);
ShowMessage(TButton(I).Caption);
向上映射不好吧...
还有，其实VCL对象使用的是引用／值模型，严格来说，并不是指针，因为我们引用对象方法时，是这样：
Form1.Show();
而不是
Form1^.Show();
*********************
Musicwind (2001-8-29 10:50:23)
to NicroSoft:
谢谢你参与讨论。
对于你说的"向上映射不好吧..."，我赞同。因为文章里讨论的其实只是表示一种技术上的可能，
但并不表示就推荐这么做。谢谢你的意见。
对于你说的“引用／值模型”，本人第一次听说，真是惭愧。但是我还是坚持认为Form1的的确确是
一个指针，不能因为访问的时候可以不加^就不是指针，那其实只是Delphi帮助你省略掉了。假如有如下
的代码：
var
Form1: TForm1;
Form2: ^TForm1;
implementation
{$R *.dfm}
procedure TForm1.MusicBtn1Click(Sender: TObject);
begin
Form2 := @Form1;
ShowMessage(Form2^.Caption);
end;
难道因为"Form2^.Caption"这样的语句就承认Form2是一个指针，而不承认Form1么？
其实，Form1是指针，Form2同样也是指针，只是Form2是指向指针的指针而已。
不知NicroSoft兄是否有些同意我的看法？
谢谢讨论。
*************************
chechy (2001-8-29 12:02:47)
我赞成Musicwind的观点。向上映射没什么不好。实际上再Delphi中，每个控件都有一个Tag属性，活用这个Tag属性可以节省大量的代码。而这个Tag刚好是整形，4个字节。这就意味着它能够存贮指针。
不过我更愿意把所谓的对象指针称之为Reference类型。这个概念和Java类似。
指针这个东西，我一直觉得它的名字起的不好，如果从物理的角度去理解，可能会有更好的感觉。即从Address的角度去理解，而不是将它想象为Pointer。
另Musicwind，第3节是面向对象的特性，不是指针的特性。
**********************
Nicrosoft (2001-8-29 12:28:24)
to Musicwind:
var
Form1: TForm1;
Form2: ^TForm1;
implementation
{$R *.dfm}
procedure TForm1.MusicBtn1Click(Sender: TObject);
begin
Form2 := @Form1;
ShowMessage(Form2^.Caption);
end;
对于这个代码，我只能说，Form1是引用，Form2是指针。
所谓引用，就是对象的别名，也就是可以当作对象来使用的“奇异”的指针，Form1就是这样的，Form2^.Caption说明了它才是指针
（BTW，好像老兄比较关注我的文章哦，我写了一篇，你就会有相应的文章出现，哈哈，个人感觉而已，不知道对不对）
to chechy:
我说的向上映射不好，是说这样的映射是“不安全”的。所以编译器需要程序员强制类型转换以确认这样做的后果。面向对象编程的思想中，这样的做法是不被推荐的。
*******************************
Nicrosoft (2001-8-29 12:30:05)
另外，Delphi是基于“引用／值模型”的说法，不是我说的，而是Charlie说的。
******************************
chechy (2001-8-29 12:47:03)
向上映射是存在不安全性。不过实际应用应该非常广泛的。我记得Nicrosoft你好像写过有关数据与界面分离的文章（大概是这个意思）。实际上我在写一些底层模块时，通常只用TObject，TForm，TComponent这样的基类。而在实际过程中，这些都是具体的对象，那么就需要被转化。此外Delphi的Uses不能循环使用，也迫使某些参数必须使用基类。这些都是向上映射。
不过在转化是，我倒是建议大家不要使用强制类型转换，而用as操作符。虽然效率差了些，但是对于发现程序错误非常有用。
***************************************
Musicwind (2001-8-29 13:09:51)
to chechy:
很高兴再一次见到你回复我的贴字，谢谢！
对你所说的活用Tag，表示赞同！因为这其实是我第四节隐含在文字后面想要
表达的意思。
不用"指针"，而用reference似乎也说得过去。
至于第三节，有些面向对象的特性，说得好。
-
等级
本版专家分：2800
-
to hellion(恶人):
说得好，正有此嫌疑。
-
等级
本版专家分：3314
-
to Musicwind:
虽然引用的本质是指针，但是，对于程序员来说，他们的概念还是需要清晰的区分的
引用对于程序员来说，可以看作对象本身，而指针不是。
你的第二个例子中：
PRPerson = ^TRPerson;
pPerson: PRPerson;
已经承认了，它是指针
但是如果这样定义：pPerson: TRPerson; 这样就不是指针，而是声明一个引用了
是指针还是引用，不是看调用的地方有没有^，而是看声明的地方。
调用的地方可以省略^，只是编译器的特性，却不是语言的特性。
-
等级
本版专家分：2389
-
关注。
我不知说什么好
把我也弄糊涂了。
-
等级
本版专家分：2800
-
to NicroSoft:
有些说到正题上了。
你说 "rPerson: TRPerson; "的声明是引用，并且认为"Form1: TForm1"的声明也是引用，我觉得
你是自相矛盾的。
请问，既然都是引用，那么，为什么系统自动分配一个TRPerson记录的内存给rPerson而不需要调用
new或者Alloc等函数？为什么声明Form1的时候，系统只是分配作为指针所需的内存而已，并没有分配
创建一个TForm1所需的内存？为什么我们可以直接使用rPerson.Name而对于Form1.Name我们需要事先调用
TForm1.Create(...)呢？同是引用，有这么大的区别么？
请注意："Form1: TForm1;"的声明和"rPerson: TRPerson;"截然不同。
rPerson和Form1只能有一个是引用，你选择哪个？
请回复，答疑，解惑。
- Object Pascal：从对象指针谈起 (转)
Object Pascal：从对象指针谈起 (转)[@more@] object Pascal：从对象指针谈起XML:namespace prefix = o ns = "urn:schemas-mic...
- Object Pascal：从对象指针谈起
Object Pascal：从对象指针谈起作者: Musicwind®创建时间: 2001-08-27~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~更新历史：No.1更新时间：2001-08-27 19:47更新人员：Musicwind®...
- Object Pascal 面向对象的特性
2 面向对象的特性 在软件系统开发过程中，结构分析技术和结构设计技术具有很多优点，但同时也存在着许多难以克服的缺点。因为结构分析技术和结构设计技术是围绕着实现处理功能来构造系统的，而在系统维护和软件...
- COM（Componet Object Model_组件对象模型）技术概述
微软组件对象模型（COM）定义了用于创建在运行时交互的可重用的软件库的二进制互操作性标准。您可以使用COM库，而不汇编成应用程序的需求。COM是许多微软产品和技术，如Windows媒体播放器和Windo...
- Delphi指针大全---转贴收藏
Delphi指针理解看一个指针用法的例子： 1 var 2 X, Y: Integer; // X and Y 整数类型 3 P: ^Integer; // P 指向整数类型的指针
- Delphi的指针
要求是这样的：sql的数据库，程序中的主线程以sql查询获取二十条记录，然后传递给子线程，主线程挂起。while ....not语句，一条条赋给子线程，每子线程存一条记录，以指针传递的(pchar).应用华为的api(vc编写）其中...
- Kernighan 评论 Pascal 语言的不足及一读者的不同意见
DOSBOX0.74板支持256色索引色，分辨率也很高
- 关于DELPHI的指针
不用不知道，到用的时候才发现凡是介绍delphi的书籍都回避了指针的问题，好不容易在网上找到一篇《浅谈Object Pascal的指针》。虽然文章那delphi的指针和c/c++的进行了对比学习，但实用例子实在太少了，所以我在写完...
- 面向对象开发讲解
面向对象的开发中，设计一个功能，设计一个系统，应该遵循的一些原则。一个理念，六个原则。 一个理念：万事万物都是对象。 开闭原则 “开一闭”原则讲的是：一个软件实体应当对扩展开放，对修改关闭。 这个...
- 关于delphi指针
要求是这样的：sql的数据库，程序中的主线程以sql查询获取二十条记录，然后传递给子线程，主线程挂起。while ….not语句，一条条赋给子线程，每子线程存一条记录，以指针传递的(pchar).应用华为的api(vc编写）其中...
- 在delphi里利用指针构造链表
<!--google_ad_client = "pub-2947489232296736";/* 728x15, 创建于 08-4-23MSDN */google_ad_slot = "3624277373";google_ad_width = 728;google_ad_height = 15;//--><script type="text/javascript"
- Delphi指针总结
看一个指针用法的例子： 1 var 2 X, Y: Integer; // X and Y 整数类型 3 P: ^Integer; // P 指向整数类型的指针 4 begin ...
- delphi指针
要求是这样的：sql的数据库，程序中的主线程以sql查询获取二十条记录，然后传递给子线程，主线程挂起。while ....not语句，一条条赋给子线程，每子线程存一条记录，以指针传递的(pchar).应用华为的api(vc编写）其中...
- 第1章 对象入门——Thinking-in-Java
第1章 对象入门“为什么面向对象的编程会在软件开发领域造成如此震憾的影响？”面向对象编程（OOP）具有多方面的吸引力。对管理人员，它实现了更快和更廉价的开发与维护过程。对分析与设计人员，建模处理变得更加...
- Java数据对象(JDO)的前世今生
Java发明以来，在短短的几年之间，迅速占领了从桌面应用（J2SE）到服务器（J2EE），再到小型设备嵌入式系统（J2ME）的应用开发市场，其语言吸取了SmallTalk的一切皆对象的理念，摆脱了C++的历史累赘，简洁、自由的...
- java基础 第一章 对象入门
第1章 对象入门 “为什么面向对象的编程会在软件开发领域造成如此震憾的影响？” 面向对象编程（OOP）具有多方面的吸引力。对管理人员，它实现了更快和更廉价的开发与维护过程。对分析与设计人员，建模...
- 【编译原理】高级语言及其语法描述
文章目录高级语宫及其语法描述（一...对语言的描述是从三个方面来考虑（精简地说）： 语法：是对语言结构的定义（什么样的符号序列是合法的）；定义语言的词法和语法的形式规则; 语义：是描述语言的含义；定义语言...
- Java对象入门
一、对象入门 “为什么面向对象的编程会在软件开发领域造成如此震憾的影响？” 面向对象编程（OOP）具有多方面的吸引力。对管理人员，它实现了更快和更廉价的开发与维护过程。对分析 与设计人员，建模处理变得更加...
- C++处理异常 try,catch,throw
异常处理的基本思想是简化程序的错误代码，为程序键壮性提供一个标准检测机制。 也许我们已经使用过异常，但是你会是一种习惯吗，不要老是想着当我打开一个文件的时候才用异常判断一下，我知道对你来说你喜欢用...
- 021_《Delphi算法与数据结构》
Delphi开发人员Julian Bucknall从实用角度为广大程序员提供了有关使用算法和数据结构的一个详尽的介绍。Bucknall先从算法性能的讨论开始，涵盖了诸如数组、链表和二叉树等内容。这本书强调了查找算法（如顺序和二分...
- 第1章 Kotlin是什么
第1章 Kotlin是什么 当下互联网大数据云计算时代，数以百万计的应用程序在服务器、移动手机端上运行，其中的开发语言有很大一部分是用流行软件界20多年的、强大稳定的主力的编程语言Java编写。 ...
- 第1章 JVM语言家族概览 《Kotin 编程思想·实战》
天地和而万物生，阴阳接而变化起。《荀子·礼记》 1.1 编程语言简述 1.1.1 编程语言是什么 所谓编程语言只是一个抽象的规范，而编译器是这个规范的实现，它是在这个规范的严格定义下被实现的. 打个比方，这个语言...
- 《Kotlin项目实战开发》第1章 Kotlin是什么
第1章 Kotlin是什么当下互联网大数据云计算时代，数以百万计的应用程序在服务器、移动手机端上运行，其中的开发语言有很大一...驾驶起来得小心翼翼地检查可能出现的空指针，处理检查异常，重复生成冗长而单调的样板代
- 我工作三年了，该懂并发了！
本文的组织形式如下，主要会介绍到同步容器类，操作系统的并发工具，Java 开发工具包（只是简单介绍一下，后面会有源码分析）。同步工具类有哪些。 下面我们就来介绍一下 Java 并发中都涉及哪些模块，这些并发模块...
- C++异常处理: try,catch,throw,finally的用法
写在前面 所谓异常处理，即让一个程序运行时遇到自己无法处理的错误时抛出一个异常，希望调用者可以发现处理问题. 异常处理的基本思想是简化程序的错误代码，为程序键壮性提供一个标准检测机制. ...
- 浅谈delphi之self
我们还要从对象与类的关系谈起。 类是对将要创建的对象的性质的描述，是一种文档。这很重要：类只是一段描述性的文字，它并不会真去分配内存，无论在其中定义多少变量。 如果打个比方，类就是图纸，而对象就是...
- Android开发10个经典案例
10个android经典案例代码，适合初学者和中级学者。
- tipdm_CarsAnalysis_src:泰迪杯C组题，数据分析答题原始码-源码
tipdm_C_CarsAnalysis_src 泰迪杯C组题答题原始代码 这个原始码为参赛者时做数据分析使用，由于其仅作为工具使用，并且加之时间缩短，所以没有做过多的性能优化。 日后会抽空改进算法，转化为效率。
- STM32F103ZET6最小系统原理图.zip
这是用我用AD绘制的STM32F103ZET6的最小系统，包含STM32F103ZET6芯片模块（引出所有I/O口），电源模块（5v转3.3v，USB或5v电源适配器供电），USB转TTL串口模块，一键下载电路，仿真器模块，复位等基本模块。
- 垃圾分类数据集及代码
资源说明： 数据集主要包括6类图片：硬纸板、纸、塑料瓶、玻璃瓶、铜制品、不可回收垃圾 代码运行说明： 1、 安装运行项目所需的python模块，包括tensorflow | numpy | keras | cv2 2、 train.py用于训练垃圾分类模型，由于训练的数据量过于庞大，因此不一并上传 3、 predict.py用于预测垃圾的类别，首先运行predict.py，然后输入需要预测的文件路径，即可得到结果。