5,392
社区成员
发帖
与我相关
我的任务
分享怎么扩展一个控件的onclick事件
我想写一个控件,从TLabel继承,实现点击控件访问一个网址。TLabel已经有一个onclick事件，我该怎么扩展它呢？
...全文
请发表友善的回复…
发表回复
xuyunlo88 2004-04-08
- 打赏
- 举报
能否连控件定义部分一起给出代码?谢谢了!
CDSoftwareWj 2004-04-08
- 打赏
- 举报
type
TLabelEx = class (TLabel)
public
.....
procedure Click; override;
published
property OnClick;
end;
procedure TLabelEx.Click;
begin
inherited
// 自己实现吧 hehe^^
end;
TLabelEx = class (TLabel)
public
.....
procedure Click; override;
published
property OnClick;
end;
procedure TLabelEx.Click;
begin
inherited
// 自己实现吧 hehe^^
end;
aiirii 2004-04-08
- 打赏
- 举报
procedure Click; override;
begin
inherited
//实现点击控件访问一个网址 實現代碼
end;
begin
inherited
//实现点击控件访问一个网址 實現代碼
end;
qingke21 2004-04-08
- 打赏
- 举报
加一个PopupMenu吧
zqc-tutorial 2004-04-08
- 打赏
- 举报
查看VCL的源代码
Taken 2004-04-08
- 打赏
- 举报
override它的Click方法
CDSoftwareWj 2004-04-08
- 打赏
- 举报
那~~那儿行？？！！ 这样的话要你做什么？
