Delphi调用爷爷类的方法（自己构建一个procedure of Object）
2021-02-01 21:16
阅读：394
标签：pad http key data tab pac procedure phi rand Delphi通过inherited 可以调用父类的方法，但是没有提供直接调用父类的父类的方法（爷爷类），通过变通的方式实现如下： 假设父类是TFather，爷爷类TGrand，调用爷爷类的Write方法： https://www.cnblogs.com/hezihang/p/4139656.html Delphi调用爷爷类的方法（自己构建一个procedure of Object） 标签：pad http key data tab pac procedure phi rand 原文地址：https://www.cnblogs.com/findumars/p/11579329.html
1
2
3
4
5
6
7
8
9
type
TWriteProc=procedure of Object;
var
WriteProc:TWriteProc;
....
TMethod(WriteProc).Code:=@TGrand.Write;
TMethod(WriteProc).Data:=Self;
WriteProc;
上一篇：win2008下iis7 https站点灰色，无法配置
下一篇：Delphi XE10.1 引用计数（Delphi XE10.1 Berlin终于增加了对接口的Weak, UnSafe的支持）
文章来自：搜素材网的编程语言模块，转载请注明文章出处。
文章标题：Delphi调用爷爷类的方法（自己构建一个procedure of Object）
文章链接：http://soscw.com/index.php/essay/49664.html
文章标题：Delphi调用爷爷类的方法（自己构建一个procedure of Object）
文章链接：http://soscw.com/index.php/essay/49664.html
评论
亲，登录后才可以留言！