5,388
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
jinjazz 2004-07-23
- 打赏
- 举报
用一个全局变量保存一下刚才焦点所在位置不就行了，呵呵
耙子 2004-07-23
- 打赏
- 举报
简单的你可以不用Button，而用SpeedButton，因为它不是TWinControl继承下来的，得不到焦点
OnSpeedButtonClick
if Self.ActiveControl.ClassNameIs('TEdit') then
(Self.ActiveControl as TEdit).Text:= '';
OnSpeedButtonClick
if Self.ActiveControl.ClassNameIs('TEdit') then
(Self.ActiveControl as TEdit).Text:= '';
耙子 2004-07-23
- 打赏
- 举报
你一点击button，那个焦点就不在Edit上了。
jinjazz 2004-07-23
- 打赏
- 举报
var i:integer;
begin
for i:=0 to Form1.ControlCount-1 do
begin
if form1.Controls[i] is Tedit then
(Form1.Controls[i] as Tedit).Clear;
end;
end;
begin
for i:=0 to Form1.ControlCount-1 do
begin
if form1.Controls[i] is Tedit then
(Form1.Controls[i] as Tedit).Clear;
end;
end;
toffen 2004-07-23
- 打赏
- 举报
请问具体怎样使用消息啊？我现在没有书，又加上刚学，很多都不会，谢谢大家说具体点。
tsst 2004-07-23
- 打赏
- 举报
使用消息吧！
