CnSpeedButton错误报告 - CnVCL 组件包 - CnPack Forum

tahhkj

普通灌水员

UID 41884
Digest Posts 0
Credits 68
Posts 25
点点分 68
Reading Access 10
Registered 2009-2-28
Status Offline

#1

Post at 2009-4-16 11:42 Profile | Blog | P.M.

CnSpeedButton错误报告

Click为何没了？

Passion (LiuXiao)

管理员

UID 359
Digest Posts 19
Credits 6838
Posts 3591
点点分 6838
Reading Access 102
Registered 2004-3-28
Status Offline

#2

Post at 2009-4-16 14:03 Profile | Blog | P.M.

,马上放到public中。

tahhkj

普通灌水员

UID 41884
Digest Posts 0
Credits 68
Posts 25
点点分 68
Reading Access 10
Registered 2009-2-28
Status Offline

#3

Post at 2009-4-16 14:30 Profile | Blog | P.M.

回复 #2 Passion 的帖子

谢谢，17点前传上去吧，我急用。

Passion (LiuXiao)

管理员

UID 359
Digest Posts 19
Credits 6838
Posts 3591
点点分 6838
Reading Access 102
Registered 2004-3-28
Status Offline

#4

Post at 2009-4-16 15:07 Profile | Blog | P.M.

在public处加入
procedure Click; override;

并在implementation部分加入：

procedure TCnSpeedButton.Click;
begin
inherited Click;
end;

即可。

tahhkj

普通灌水员

UID 41884
Digest Posts 0
Credits 68
Posts 25
点点分 68
Reading Access 10
Registered 2009-2-28
Status Offline

#5

Post at 2009-4-17 17:57 Profile | Blog | P.M.

回复 #4 Passion 的帖子

CVS更新后不能编译了，查后发现修改错了：
1.在420行的声明不正确：删除
published
procedure Click; override;

2. 在1591行重复的代码：去掉
procedure TSpeedButton.Click;
begin
inherited Click;
end;

Passion (LiuXiao)

管理员

UID 359
Digest Posts 19
Credits 6838
Posts 3591
点点分 6838
Reading Access 102
Registered 2004-3-28
Status Offline

#6

Post at 2009-4-17 18:22 Profile | Blog | P.M.

昨天俺改的太匆忙了。现已纠正。