delphi 在TcxGrid组件的cell中,弹出TdxCalloutPopup提示框
2022-09-26补充:
文章中的实例存在以下特点(缺陷?),请各位先了解后,再确定是否使用:
当TdxCalloutPopup弹出的组件失去焦点时,TdxCalloutPopup就会把弹出的组件隐藏起来.如果用户在里面有待处理的数据,会立马丢失.
先看效果图:
需求:
当点击UserName字段下的单元格时,弱出这个提示框,框内可以有很多其他控件
设计图:
核心代码就两句话,TMD搞了我两天时间!最后还是我猫哥一语中的:
procedure TForm1.cxGrid1DBTableView1CellClick(Sender: TcxCustomGridTableView; ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton; AShift: TShiftState; var AHandled: Boolean); var R: TRect; begin if cxGrid1DBTableView1.Controller.FocusedColumn.name = 'UserName' then begin r:=ACellViewInfo.EditBounds ; dxCalloutPopup1.Popup(cxGrid1 , R); end; end;
2023-03-09更新
因为后续工作中再次用到了这个控件,我又研究了一遍这个控件,所以这里再详细说一下各个属性的作用.
1.Alignment,即设置 TdxCalloutPopup 控件 在 什么位置展现出来
2. AnimationOptions 是设置动画效果的.
FadeEffect用来设置是否显示过场动画,也就是隐藏与显示的动画,默认是开启状态.如果设置为false则其下属性均不起作用.
两个时间,是用来设置隐藏和显示这段动画的持续时长的
MoveEffect则是用来设置是否显示运动轨迹的.默认为True.体现为 弹窗在展现时会有一个,从一个方向到另一个方向(主要看Alignment属性设置)的短暂运动过程
如果设置为false,弹窗就会体现为原地渐隐或者渐现.
3.两个颜色值.保持一致会更加美观
BorderColor是边框颜色,这就是字面意思.
Color是背景颜色,下面效果图
4.FlyoutPanel 属性
如果 Active:True,则表示 dxCalloutPopup1 会在你设置的 TdxCalloutPopup.PopupControl 里面(内部)弹出,而不是在 TdxCalloutPopup.PopupControl 外围.
FlyoutPanel下的Align属性则表示 当Active:True时,TdxCalloutPopup是从哪个方向开始弹出的.这个过程里是有个过渡动画的,打个比方,你这里设置了fpaTop,则TdxCalloutPopup 弹窗就是从上往下缓缓下拉展示出来.fpaLeft就是从左往右展现
5.HideCallOut设置弹窗是否隐藏小尖尖,默认是False,也就是不隐藏
6.LookAndFeel,外观控制器.我没研究出什么区别来
7.弹窗边框圆角设置.
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】博客园社区专享云产品让利特惠,阿里云新客6.5折上折
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· 一个费力不讨好的项目,让我损失了近一半的绩效!
· 清华大学推出第四讲使用 DeepSeek + DeepResearch 让科研像聊天一样简单!
· 实操Deepseek接入个人知识库
· CSnakes vs Python.NET:高效嵌入与灵活互通的跨语言方案对比
· Plotly.NET 一个为 .NET 打造的强大开源交互式图表库