社区
Delphi
帖子详情
只有10分了。在memo或richedit控件中为了实现横向滚屏添加了滚动条,但是界面显示时也显示滚动条,不好看,怎么才能将其隐藏???
ymhf19373200
2003-10-21 10:32:38
在memo或richedit控件中为了实现横向滚屏添加了滚动条,但是界面显示时也显示滚动条,不好看,怎么才能将其隐藏???
...全文
58
回复
打赏
收藏
只有10分了。在memo或richedit控件中为了实现横向滚屏添加了滚动条,但是界面显示时也显示滚动条,不好看,怎么才能将其隐藏???
在memo或richedit控件中为了实现横向滚屏添加了滚动条,但是界面显示时也显示滚动条,不好看,怎么才能将其隐藏???
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
解决
Memo
控件
选择文本
时
屏幕滚动
一个小问题却困扰了我很长
时
间: Delphi FMX下用
memo
控件
编写的文本编辑器在选择文本
时
,屏幕上下滚动,导致选择操作很难进行。而手机输入法自带的编辑选择功能,在自己定制的编辑器
中
却不起作用(输入法接口函数找不到)。尤其在修改一些源程序代码
时
,复制、粘贴起来简直令人恼火。 经过不断摸索,现在终于算是解决了!方法如下: 在
memo
的mousemove事件
中
,当选择文本的长度大于0小于50
时
,禁止滚动;当选择文本长度大于50,允许滚动,这样屏幕上滑后可继续拖动选择文本。在mouseleave事件
中
,当选择
Borland C++Builder 6下
实现
Rich
Edit
滚屏
效果[原创]
以前一直使用
Memo
控件
多些,这次使用
Rich
Edit
主要是为了换行功能,但遇到
滚动条
不自动跟进的情况,google发现CSDN上有解决办法,加上就OK了SendMessage(Out
Rich
Edit
->Handle, EM_SCROLL, SB_PAGEDOWN , 0);//SB_LINEDOWN, 0); 转载于:https:...
css
横向
、纵向
滚动条
注意:(
滚动条
设置的width、height,分别是对应纵向
滚动条
宽度、
横向
滚动条
高度,无法修改纵向
滚动条
高度、
横向
滚动条
宽度数值只介绍Google浏览器
滚动条
样式,常用属性如下) ::-webkit-scrollbar
滚动条
整体样式 ::-webkit-scrollbar-button 一设置
滚动条
样式,
滚动条
两端的按钮图标就消失,但可以重新设置图片、新样式 ::-w...
Delphi
中
Rich
Edit
的奥妙
对于
memo
来说,
实现
undo是不需编程的,只要让popupmenu属性为空,运行
时
就能用鼠标右键激活一个常用操作菜单,其
中
包括撤消、剪切、复制、粘贴、删除和全选六项。但可惜的是,这一招对于功能强大的
Rich
Edit
控件
居然行不通,害得我们还要自己设计一个popupmemu。当你用CutToClipBoard等语句轻松而顺利地完成了“剪切”等功能,接着便会无奈地发现,竟找不到undo或cancel之类的语句来执行“撤消”。在button的onclick事件
中
写入下列代码。需要注意的是,第一行的行号为零。
delphi 获得
memo
,
Rich
edit
焦点所在行
procedure TForm1.Button1Click(Sender: TObject); var i:Integer; begin i:=SendMessage(
Rich
edit
1.handle,EM_LINEFROMCHAR,
Rich
edit
1.selstart,0)+1; ShowMessage(IntToStr(i)); end; 转载于:http...
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章