Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Catalog · How the catalog works

Random project

DevDataPager

分页控件

View on GitHub

Anyone may press Interesting, signed in or not. It helps others find this project.

Member rating

No ratings yet.

Sign in to rate this project.

README

DevDataPager

Delphi分页控件

版权所有 (c) 研究 QQ:71051699

(1)、使用许可
您可以自由复制、分发、修改本源码,但您的修改应该反馈给作者,并允许作者在必要时, 合并到本项目中以供使用,合并后的源码同样遵循本版权声明限制。
您的产品的关于中,应包含以下的版本声明:
本产品使用的分页控件(TDevDataPager)版权归作者所有。

(2)、技术支持
有技术问题,您可以加QQ群30311217共同探讨。

(3)、赞助
您可以自由使用本源码而不需要支付任何费用。如果您觉得本源码对您有帮助,您可以赞助本项目。

注:部分代码引用了 Developer Express 的相关单元,如有侵权可联系移除!

修改历史

===================

  • 增加 Dev依赖编译指令,默认为关闭状态,在Defs.inc文件取消注释即可
  • 增加 字体及颜色定义属性
    • 修正 cpu占用过高的问题
    • 调整了部分属性名称

===================

  1. 9
    • 修复 记录总数为0时鼠标移到控件时出错误
      • 增加 内部控件的文本属性
    • 优化 分页操作的逻辑
    • 调整 公布GetElementWidth方法

===================

  1. 1
  • 修正 切换页面时刷新问题
  • 修正 使用Dev皮肤时出错的问题
    • 增加 内部控件最小宽度

===================

  1. 1
  • 增加 分页下拉选项中增加全部 (注意:只有当前页码大于1页时,才会显示全部)
    • 修正 指定每页大小时页码框中数值不变
    • 修正 页码框位置问题
    • 调整 字符资源到resourcestring

===================

  • 修正 在Dev20.1.x时黑底(需设置Defs.inc中Dev20PlusFix开关)

===================

  1. 0
  • 增加 AutoWidth属性,自动宽度 [感谢 围墙(qq:412252480)的提交]

===================

  1. .21
  • 修正 运行时可能存报“Range check error”的问题
  • 修正 设置背景色时控件中元素高度异常
  • 优化 双缓冲绘图时的性能

===================

  1. 5
  • 增加 分页区域尺寸属性,默认值保持不变
  • 增加 远程会话变化后的DPI与字体同步
    • 完善 Delphi新旧版本及DevExpress、非DevExpress高分屏适配

    • 调整 字体缩放、皮肤绘制及状态颜色,减少残影和重复重绘

    • 调整 页码输入框字体、内边距及布局同步

    • 修正 鼠标悬停、按下释放及元素重建后的状态处理

    • 修正 总数、页容量变化及重复选择页容量后的页码更新

    • 修正 全部菜单项识别,补齐Setting.Assign属性复制

      运行效果图 image