有一按钮,单击下高度变为原来的2倍,再点一下回到原来大小,怎么实现? ( 积分: 10 )

  • 主题发起人 主题发起人 suncheng_hong
  • 开始时间 开始时间
S

suncheng_hong

Unregistered / Unconfirmed
GUEST, unregistred user!
如题.小弟初学DELPHI,突发奇想.但不会实现.<br>不知道D7里有没有RECLICK事件?
 
如题.小弟初学DELPHI,突发奇想.但不会实现.<br>不知道D7里有没有RECLICK事件?
 
没有,但有onclick事件<br><br>const BtnHeight=原来按钮的高度;<br><br>procedure ........click(Sender:TObject);<br>begin<br>if 那个按钮.height=BtnHeight then 那个按钮.height:=那个按钮.height*2<br> else 那个按钮.height:=BtnHeight;<br>end;
 
谢谢你了
 

Similar threads

S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
913
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部