请问我要继承TLable和TEdit两个类应怎样作呢

stiwin 2002-02-05 01:12:40
请高手们写个EMail在这里
...全文
46 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
stiwin 2002-02-07
  • 打赏
  • 举报
回复
不是,我是说的一个类继承多个类的方法or属性
抱朴守拙 2002-02-05
  • 打赏
  • 举报
回复
//例子:
unit SpdBtn;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Buttons;

type
TSpdBtn = class(TSpeedButton) //继承自TSpeedButton
private
{ Private declarations }
protected
{ Protected declarations }
public
{ Public declarations }
published
{ Published declarations }
end;

procedure Register;

implementation

procedure Register;
begin
RegisterComponents('Samples', [TSpdBtn]);
end;

{ TSpdBtn }

end.
dancemaple 2002-02-05
  • 打赏
  • 举报
回复
从TEdit继承,为它增加一个属性,类型为TLabel
踢踏 2002-02-05
  • 打赏
  • 举报
回复
delphi6里面就有这个控件的,成为LabeledEdit,你可以去看看
stiwin 2002-02-05
  • 打赏
  • 举报
回复
谢谢大家了

5,386

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧