社区
Delphi
帖子详情
类继承的问题
realx
2006-07-26 10:33:27
有基类FORMA(是一个FORM),FORMA中有个按扭BUTTON1,BUTTON1.click的时候弹出FORMB。要求所有继承自FORMA的类FORMAN,当FROMAN.BUTTON1.click的时候弹出FORMB,FORMB.CAPTION:=FORMAN.CAPTION。请问该如何实现?
...全文
199
7
打赏
收藏
类继承的问题
有基类FORMA(是一个FORM),FORMA中有个按扭BUTTON1,BUTTON1.click的时候弹出FORMB。要求所有继承自FORMA的类FORMAN,当FROMAN.BUTTON1.click的时候弹出FORMB,FORMB.CAPTION:=FORMAN.CAPTION。请问该如何实现?
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
tianyan0307
2007-01-16
打赏
举报
回复
UP
qzmp_sc
2007-01-16
打赏
举报
回复
100分啊。。。。
Comer
2007-01-16
打赏
举报
回复
100分啊。。。。
hongqi162
2007-01-16
打赏
举报
回复
100分啊。。。。
yi10000
2007-01-16
打赏
举报
回复
来完了,帮顶
才子鸣
2007-01-16
打赏
举报
回复
UP樓上的
postren
2006-07-26
打赏
举报
回复
FormA
-------------
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TFormA = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
FormA: TFormA;
implementation
uses Unit3;
{$R *.dfm}
procedure TFormA.Button1Click(Sender: TObject);
begin
FormB.Show(Caption);
end;
end.
----------
FormB
-------unit Unit3;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TFormB = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
procedure Show(ACaption: string); overload;
end;
var
FormB: TFormB;
implementation
{$R *.dfm}
procedure TFormB.Show(ACaption: string);
begin
Self.Caption := ACaption;
Self.Show;
end;
end.
--------
FormN
-----
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Unit1, StdCtrls;
type
TFormN = class(TFormA)
private
{ Private declarations }
public
{ Public declarations }
end;
var
FormN: TFormN;
implementation
{$R *.dfm}
end.
java学习笔记总结
继承
允许一个
类
(子
类
)
继承
另一个
类
(父
类
)的属性和方法,实现了代码重用。多态则是指一个接口可以有多种不同的实现,增强了程序的灵活性。 在Java中,异常处理也是关键部分。通过try-catch-finally语句块,可以...
java中
继承
类
student
类
例子_java中student
类
继承
问题
完成下面父
类
和子
类
的定义:(1)定义Student
类
,放入stu包中。属性包括学号、姓名、英语成绩、数学成绩、计算机成绩和总成绩。方法包括构造方法、get方法、set方法、toString方法(返回该
类
的对象)、equals方法(比较两...
Enum
类
继承
问题
1、枚举
类
介绍 如果一个
类
的实例是有限且确定的,那么可以使用枚举
类
。比如:季节
类
,只有春夏秋冬四个实例。 枚举
类
使用enum进行创建,其实例必须从”第一行“开始显示写出。 enum Season{ SPRING,SUMMER,FALL...
C++模板
类
(
类
模板)与
继承
类
模板和
类
模板之间、
类
模板和
类
之间可以互相
继承
。它们之间的派生关系有以下四种情况。
java单例
类
继承
问题
--使用登记式单例的发现
最近在开发中遇到
问题
了,恰好需要
继承
单例
类
.找资料才找到了这个解决办法---登记式单例.登记式单例
类
是为了克服饿汉式单例
类
及懒汉式单例
类
均不可
继承
的缺点而设计的。当单例
类
需要被
继承
时适用.代码清单3:登记式...
Delphi
5,928
社区成员
262,931
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章