delphi窗体继承

1.手工修改窗体继承时,怎样让其父类的所有控件显示(在设计时)?

File -> New -> Form,新建一个form,在form的单元文件中修改

TForm1 = class(TForm) 为;

TForm1 = class(TFatherForm) //TFatherForm为被继承的窗体

不要忘记  uses TFatherForm的单元文件,

再在Form窗体上弹出右键菜单,选择View As Text

把第一行的Object 改成 inherited 后保存;

再在Form标签上点击右键,选择View Form;就可以看到继承的窗体了。

posted on   癫狂编程  阅读(486)  评论(0编辑  收藏  举报

编辑推荐:
· 浏览器原生「磁吸」效果!Anchor Positioning 锚点定位神器解析
· 没有源码,如何修改代码逻辑?
· 一个奇形怪状的面试题:Bean中的CHM要不要加volatile?
· [.NET]调用本地 Deepseek 模型
· 一个费力不讨好的项目,让我损失了近一半的绩效!
阅读排行:
· 全网最简单!3分钟用满血DeepSeek R1开发一款AI智能客服,零代码轻松接入微信、公众号、小程
· .NET 10 首个预览版发布,跨平台开发与性能全面提升
· 《HelloGitHub》第 107 期
· 全程使用 AI 从 0 到 1 写了个小工具
· 从文本到图像:SSE 如何助力 AI 内容实时呈现?(Typescript篇)
历史上的今天:
2019-11-28 关于PLSQL配置了正确的Oracle客户端但是不能识别tnsnames.ora问题
2019-11-28 plsql 32位,Oracle Client 64位 无法读取tnsnames.ora文件
2019-11-28 PLSQL Developer数据库连接和tnsname.ora的配置
2019-11-28 PLSQL配置
2018-11-28 Delphi 之 编辑框控件(TEdit)

导航

< 2025年3月 >
23 24 25 26 27 28 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31 1 2 3 4 5
好的代码像粥一样,都是用时间熬出来的
点击右上角即可分享
微信分享提示