社区
VCL组件使用和开发
帖子详情
如何获取TStringGrid滚动条位置?
spacexplorer
2009-08-22 12:19:40
查了半天也没查到答案,只好来问了。。。
我是想实现:当滚动条位置在最下边时,插入一条记录就向上滚动,当滚动条位置不在最下边时,在下边插入记录不滚动。先谢过。。。
...全文
114
4
打赏
收藏
如何获取TStringGrid滚动条位置?
查了半天也没查到答案,只好来问了。。。 我是想实现:当滚动条位置在最下边时,插入一条记录就向上滚动,当滚动条位置不在最下边时,在下边插入记录不滚动。先谢过。。。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
4 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
lihuimin622
2009-08-22
打赏
举报
回复
插入一条记录后加一句:
SendMessage(StringGrid1->Handle,WM_VSCROLL,SB_BOTTOM,0);
spacexplorer
2009-08-22
打赏
举报
回复
测试通过,感谢回复!
lihuimin622
2009-08-22
打赏
举报
回复
int ppos=::GetScrollPos(StringGrid1->Handle,SB_VERT);//获得当前滚动条位置
POINT pt;
GetScrollRange(StringGrid1->Handle, SB_VERT,(LPINT)&pt.x,(LPINT)&pt.y);//获得滚动条范围最大值
if (ppos==pt.y)
ShowMessage("在最下面");
spacexplorer
2009-08-22
打赏
举报
回复
首先,谢谢回复!
这条语句,应该是滚动条滚到最下边吧?这个相对还好实现,但是如何知道滚动条是不是在最下边呢?因为那个时候不需要滚动
T
String
Grid
的Diy控件
String
Grid
Expand
功能: 1.随意DIY,
String
Grid
的外观,字体都可以改变 2.改善
String
Grid
的流畅度 3.实现
String
Grid
连接数据库...8.无
滚动条
功能 9.每行或列样式可以设置为不一样 10.完全开放代码 其他功能自己DIY一下吧 环境:delphi7
T
String
Grid
的Diy控件
String
Grid
Expand(修正缺少文件)
功能: 1.随意DIY,
String
Grid
的外观,字体都可以改变 2.改善
String
Grid
的流畅度 ...8.无
滚动条
功能 9.每行或列样式可以设置为不一样 10.完全开放代码 其他功能自己DIY一下吧 环境:delphi7 修正旧版本缺少文件的问题
Delphi开发技巧之-VCL
检查T
String
Grid
是否有
滚动条
添加接口对象到list 清空
String
Grid
的所有单元 移动listbox项目 移动TListView项目 移动TRichEdit内光标到指定
位置
聚焦TDB
Grid
某些单元 自动打开TDateTimePicker 自定义Memo边界
获取
...
delphi 开发经验技巧宝典源码
0015 以原始风格显示控件的
滚动条
11 0016 使用快捷键打开对象观察器中的“...”按钮 11 1.5 其他相关应用技巧 11 0017 安装合适的Delphi版本 11 0018 熟练掌握Delphi中的菜单项 12 0019 构成Delphi项目...
VCL组件使用和开发
604
社区成员
13,460
社区内容
发帖
与我相关
我的任务
VCL组件使用和开发
C++ Builder VCL组件使用和开发
复制链接
扫一扫
分享
社区描述
C++ Builder VCL组件使用和开发
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章