社区
Delphi
帖子详情
如何使TMemo控件不能获得键盘,鼠标焦点?
kwest
2003-04-09 07:45:20
就象windows的计算器一样,上面那个文本窗口不能获得鼠标光标的。
...全文
135
11
打赏
收藏
如何使TMemo控件不能获得键盘,鼠标焦点?
就象windows的计算器一样,上面那个文本窗口不能获得鼠标光标的。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
11 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
haoco
2003-04-12
打赏
举报
回复
你可以这样:
先放一个Panel,再将Memo放到Panel上面,将Panel的Enable设为false这样Memo就不能得到焦点,而它也不会变灰的
jifee
2003-04-12
打赏
举报
回复
为什么不用TLabel控件,只要WordWrap:=True就和Memo一摸一样。
TMemo本身是TWinControl,不可能拦截焦点,除非在CreateParameter方法和ControlStyle属性中作文章;
kwest
2003-04-12
打赏
举报
回复
谢谢各位了,看来也只好如此了。。。。
blazingfire
2003-04-12
打赏
举报
回复
hehe~~~
不要用TEdit,TMemo
呀,用TPanel,该颜色和边框就行了!
kwest
2003-04-11
打赏
举报
回复
你们说的方法我用过的,ReadOnly:= true;可以使选取文本不能修改.
enable:=false;到是可以使Memo不能获得鼠标光标,但文本变灰了,有碍观赏 ^_*
我想是不是可以通过拦截鼠标消息来达到这个目的,我用spy++观察了一下,可能是WM_ACTIVECURSOR
消息,不过,小弟我才疏学浅,望那位大侠能不吝赐教!!
分不够,我可以再加的...
数字蛋糕
2003-04-09
打赏
举报
回复
如果你只是想显示文字,使用Label加上WordWrap就可以了。
如果你希望用户能够选取文本却又不能修改,使用Memo的时候加上ReadOnly就行了。
如果你不希望用户按TAB键跳入Memo,那么就应该设置TabStop为False。
lhy39494111
2003-04-09
打赏
举报
回复
ReadOnly:= true;
enable:=false;
siyu2002
2003-04-09
打赏
举报
回复
enable:=false;
joky1981
2003-04-09
打赏
举报
回复
ReadOnly:= true;
TabStop:= false;
czzw
2003-04-09
打赏
举报
回复
enable:=false;
weitao999
2003-04-09
打赏
举报
回复
比如还有一edit或button
在memo的onenter事件里可以这样写
edit.setfocus(or button.setfocus)
delphi简单判断程序30秒没有
键盘
和
鼠标
动作示例
本文介绍了一个使用Delphi编写的简单程序,该程序通过一个窗体实现定时关闭的功能。具体来说,程序中定义了一个窗体Form1,其中包含了一个Memo
控件
用于显示信息,一个Button
控件
用于立即关闭程序,以及一个Timer
控件
用于实现延迟关闭。当用户进行
鼠标
移动或
键盘
操作时,程序将重置计时器,确保只有在一段时间内没有用户活动的情况下才会触发关闭。
Memo
控件
中控制翻页
本文介绍了一个使用Delphi实现的窗体
鼠标
拖动功能示例。通过监听
鼠标
事件,可以实现在不借助标题栏的情况下自由移动窗体。此外,还展示了如何通过按钮触发特定
键盘
事件。
Delphi 2010 新增功能之: 软
键盘
、触摸
键盘
(TTouchKeyboard)
本文介绍了一个使用Delphi实现的虚拟触摸
键盘
项目,允许用户自定义
键盘
布局、颜色及功能键名称等设置。通过几个简单的
控件
即可实现背景色、
键盘
布局及功能键重命名等功能。
FireMonkey 做界面的一个小技巧
本文介绍了如何使用FireMonkey框架来仿制Windows 10的便签应用界面,实现每条便签黄色背景、黑色字体,并在
鼠标
悬停时颜色加深的效果。通过创建多个Frame实例并设置Align属性,以及利用Rectangle覆盖Memo来控制颜色变化。同时,设置Memo为只读和不可点击,以防止内容被修改。当需要编辑内容时,可以弹出一个编辑框覆盖原有界面。文章提供了一种动态响应
鼠标
输入的小技巧,即通过调整Rectangle的透明度和可见性来实现颜色动态变化。
一个Delphi程序员自述的开发经验
本文分享了一个Delphi程序员的开发经验,详细介绍了数据库系统前台开发的步骤与注意事项,包括代码风格、组件属性设置、界面布局及代码调试等方面。
Delphi
5,943
社区成员
262,943
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章