[控件] 加强版 TOneSelection (改良自 Berlin 10.1 TSelection)

本控件修改自 Delphi Berlin 10.1 的 TSelection (FMX.Controls.pas)

修改重点:

  1. 移动点显示在上方
  2. 增加(左中,上中,右中,下中)控制点,含原来的总共有 8 个控制点

代码说明:

  1. 代码内 {+++> 代表我增加的代码
  2. 代码内 {---> 代表我删除的代码
  3. 未来新版 Delphi 可以自己将 {+++> {---> 移植到新版代码内
  4. 本控件不含 Register; 若需要请自行加入

效果:

 

源码及例子下载:(2016/12/30 修正更新)

[控件]TOneSelection(等比修正版)_by_龟山Aone.zip

posted @   龟山Aone  阅读(1987)  评论(5编辑  收藏  举报
编辑推荐:
· AI与.NET技术实操系列:基于图像分类模型对图像进行分类
· go语言实现终端里的倒计时
· 如何编写易于单元测试的代码
· 10年+ .NET Coder 心语,封装的思维:从隐藏、稳定开始理解其本质意义
· .NET Core 中如何实现缓存的预热?
阅读排行:
· 分享一个免费、快速、无限量使用的满血 DeepSeek R1 模型,支持深度思考和联网搜索!
· 基于 Docker 搭建 FRP 内网穿透开源项目(很简单哒)
· 25岁的心里话
· ollama系列01:轻松3步本地部署deepseek,普通电脑可用
· 按钮权限的设计及实现
点击右上角即可分享
微信分享提示