随笔分类 -  Dev

dev 按指定按键弹出下拉控件
摘要：if (AItem = cxGrid1DBTableView1cgsl) and (key in [106, 107, 109, 111]) then begin if AEdit <> nil then if AEdit.ClassType = TcxCalcEdit then //如果是计算器 阅读全文
posted @ 2025-01-11 08:40 Tag 阅读(19) 评论(0) 推荐(0)
DEV cxgrid 自绘相关
摘要：procedure cxgrdbndclmn_jgzqCustomDrawCell( Sender: TcxCustomGridTableView; ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boo 阅读全文
posted @ 2024-11-29 17:18 Tag 阅读(26) 评论(0) 推荐(0)
DEV dxTabbedMDIManager
摘要：1.默认MDI 显示后是有窗体的ICON，要去掉 type TdxTabbedMDITabPropertiesAccess = class(TdxTabbedMDITabProperties) end; procedure TForm1.FormCreate(Sender: TObject);beg 阅读全文
posted @ 2024-07-20 18:03 Tag 阅读(49) 评论(0) 推荐(0)
delphi dev cxgrid 列绑定Richedti 支持过滤
摘要：默认是不支持过滤的，这里需要改到内部的一些源码文件。 先说思路：先把richedit.pas 中的 ConvertRichText IsRichText 开放出来。多加上声明 1.要让列支持过滤需要重载richedit类的 GetSupportedOperations， type TcxRichEd 阅读全文
posted @ 2024-07-13 18:13 Tag 阅读(91) 评论(0) 推荐(0)
delphi cxgrid 画鼠标经过的轨迹或者说是鼠标经过下高亮行
摘要：unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, dxSkinsCore, dxSkinsDefaultPainters, dx 阅读全文
posted @ 2024-05-20 09:10 Tag 阅读(50) 评论(0) 推荐(0)
delphi cxgrid自定义画焦点框,把自带的虚线框去掉
摘要：参考资料将 FocusRect 从虚线更改为实线或更改 FocusRect 的颜色 |DevExpress 支持如何在 TableView 网格中的整个选定/聚焦行周围绘制边框？ |DevExpress 支持 procedure TcxGridTableView.DoCustomDrawCell(A 阅读全文
posted @ 2024-05-19 11:34 Tag 阅读(71) 评论(0) 推荐(0)
delphi cxgrid 过滤列表增加右键
摘要：首先弹出来的下拉过滤列表也是一个form 思路,在不改源代码的情况：hook,捕捉 WM_SHOWWINDOW 消息，通过源码得知窗口类名 为”TcxGridFilterPopup“ 再通过句柄转得到实例，同时在本单元type 一下新的 TcxGridFilterPopup， TcxGridPopu 阅读全文
posted @ 2023-12-20 09:09 Tag 阅读(136) 评论(0) 推荐(0)
delphi dev cxLookupComboBox 模糊搜索
摘要：//不是过滤DATASET,适合用在下拉数据很多的情况。过滤的必须是下拉有添加的列 procedure cxLookupComboBoxLikeSearchInitPopup(Sender: TObject); var FEdit: TcxLookupComboBox absolute Sender 阅读全文
posted @ 2023-11-19 10:01 Tag 阅读(518) 评论(0) 推荐(0)
Delphi cxGrid 选择速度优化
摘要：表格有一个选择列，用来选择数据后。提取选中的记录做某些事，这种是很常见的。 现有以下需求： 右键全选 、反选（支持选择过滤后的数据） 如果全部采取DB感知的方式 ，数据多的时候很卡。测试1000多条就很卡了 解决方案： //改成智能新 cxGridDB.DataController.DataMode 阅读全文
posted @ 2022-06-27 12:04 Tag 阅读(603) 评论(0) 推荐(0)
Delphi Dev 默认皮肤相关单元
摘要：使用默认皮肤相关单元： dxSkinsDefaultPainters //默认皮肤 dxSkinscxPCPainter //要引用这个pagecontrol才有皮肤 dxSkinsdxStatusBarPainter //用引用这个 状态栏才有皮肤 dxSkinsdxBarPainter //菜单 阅读全文
posted @ 2022-05-31 17:06 Tag 阅读(125) 评论(0) 推荐(0)