社区
Delphi
帖子详情
怎么样判别焦点是否在某个控件上?
cutedelphigirl
2003-08-22 08:13:43
一个form上有几个toolbutton,下面有一个dbgrid,几个eidt等,我的toolbutton
中有些操作,必须是焦点在某个控件上才起作用,所以,怎么样在程序中判别焦点是否在某个控件上?
...全文
63
11
打赏
收藏
怎么样判别焦点是否在某个控件上?
一个form上有几个toolbutton,下面有一个dbgrid,几个eidt等,我的toolbutton 中有些操作,必须是焦点在某个控件上才起作用,所以,怎么样在程序中判别焦点是否在某个控件上?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
11 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
sduzjw
2003-08-22
打赏
举报
回复
不过我还是学了一招呀
cnhgj
2003-08-22
打赏
举报
回复
都说了!
ZyxIp
2003-08-22
打赏
举报
回复
wooden954(wooden)
呵呵,看清楼主是要用 toolbutton 来判断,并不是所有的按钮在你点它的时候就能获得焦点,toolbutton就是按钮但不会得到焦点。
要用别的变量或Tag的值都会很麻烦。
IORILI
2003-08-22
打赏
举报
回复
if edit1.Focused then
showmessage('dfdfd');
proman2003
2003-08-22
打赏
举报
回复
用Focused属性
wooden954
2003-08-22
打赏
举报
回复
设置一个全局变量,每转移一次焦点就改变它的值,在需要判断的时候只要判断这个值就可以,如果用楼上 ZyxIp(绝望中...) 的办法永远也不能实现,因为你在点击按钮的时候焦点就变到那个按钮上去了,楼上 foreveryday007(有無數種方法可以浪費一天的時間…但是…) ( ) 信誉:100 的办法也是可行的!
Little2000
2003-08-22
打赏
举报
回复
正如一楼所说的,控件.Focused可以判断该控件有焦点。
foreveryday007
2003-08-22
打赏
举报
回复
设置相应的控件的TAG值
case ActiveControl.Tag of
1:
2:
...
end;
ZyxIp
2003-08-22
打赏
举报
回复
if edit1.Focused then
showmessage(判断是否有焦点);
edit1.setfocus ;//设置焦点。
lemon_wei
2003-08-22
打赏
举报
回复
学了一招,哈哈
overtime
2003-08-22
打赏
举报
回复
ActiveControl.Name
怎么样
判别
焦点
是否
在某个
控件
上
5、怎么样
判别
焦点
是否
在某个
控件
上?答:if Tobject.focused then//
焦点
在某某
控件
上else
DataGrid
控件
在VB的详细使用
使用 DataGrid
控件
DataGrid
控件
是一种类似于电子数据表的绑定
控件
,可以显示一系列行和列来表示 Recordset 对象的记录和字段。可以使用 DataGrid 来创建一个允许最终用户阅读和写入到绝大多数数据库的应用程序。...
android遥控器管理,Android 遥控器适配
在针对会议平板或大型显示设备(Android系统)中,大部分情况下需要通过鼠标、键盘或者遥控器来控制显示界面,以弥补因设备尺寸等因素导致的无法...
焦点
态:指当前遥控器的“光标”默认选中某个
控件
,或者指悬浮于某个...
DELPHI
控件
属性事件说明
常用DELPHI
控件
属性事件设置说明 常用DELPHI
控件
属性设置说明目录TForm ClassTPanel组件TToolBar ClassTToolButton ClassTTimer ClassTADOConnection ClassTADOQuery ClassTADODataSet ClassTDBGrid ...
Win32通用
控件
核心提示:9.1.1 通用
控件
的分类 大部分的通用
控件
由Comctl32.dll模块提供,所以在使用之前要在源程序中包含相应的include和includelib语句: include Comctl32.inc includelib Comctl32.libComctl32.dll中提供的...
Delphi
5,379
社区成员
262,722
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章