随笔分类 -  Delphi DevExpress

摘要:cxgrid是自带选择框的表格,开启 设置如下。 然后 后台获取 前端选中的记录字段值。用下面语句。 for I := 0 to Gview1.DataController.GetSelectedCount-1 do begin // 第一个值选中的 行 。 第二个值要获取值的字段索引 从 0 开始 阅读全文
posted @ 2024-11-14 10:20 Thenext 阅读(11) 评论(0) 推荐(0) 编辑
摘要:DEV控件确实很漂亮,但是在TcxBarEditItem编辑框录入内容后,必须回车或者TAB键才有效,否则就会消失。 解决办法 1、输入之后按Enter或者TAB键。 2、在onCurChange事件加这句行:cxBarEditItem1.EditValue := cxBarEditItem1.Cu 阅读全文
posted @ 2024-09-06 16:01 Thenext 阅读(18) 评论(0) 推荐(0) 编辑
摘要:方法: 增加控件cxGridPopupMenu,绑定对应的cxgrid ,再增加控件:,右键的菜单内容在此设定。 这里是需要设置在哪些地方可以右键弹出。 设置自定义的右键菜单。 阅读全文
posted @ 2024-01-06 10:46 Thenext 阅读(67) 评论(0) 推荐(1) 编辑
摘要://恢复布局IniFileName := ExtractFilePath(Application.ExeName) + 'Layout/' + Self.Name + '.ini';if FileExists(IniFileName) thenSelf.tvResult.RestoreFromIni 阅读全文
posted @ 2023-12-16 11:48 Thenext 阅读(40) 评论(0) 推荐(0) 编辑
摘要:TcxGridDBTableSummaryItem 引用单元 cxGridDBTableView 阅读全文
posted @ 2023-12-15 21:42 Thenext 阅读(25) 评论(0) 推荐(0) 编辑
摘要:要删除CXGrid中的所有列,可以使用以下代码: procedure TForm1.Button1Click(Sender: TObject); var i: Integer; begin // 从最后一列开始删除,以避免索引错误 for i := cxGrid1DBTableView1.Colum 阅读全文
posted @ 2023-11-03 09:15 Thenext 阅读(129) 评论(0) 推荐(0) 编辑
摘要:cxGrid,数据库中存在:GongSiNo,GongSiMc;cxGrid中显示列GongSiMc,Properties指定的是ComBoBox,GongSiMc变化时更新GongSiNo的值并存入数据库。在Properties的OnChange事件中写代码:{ GSNo, GSMc: strin 阅读全文
posted @ 2023-10-30 16:04 Thenext 阅读(237) 评论(0) 推荐(0) 编辑
摘要:Dev的表格中编辑捕获EditValueChanged事件技巧:如果需要立即获取到控件编辑的当前值,调用一下GridView的PostEditor( )方法即可。 阅读全文
posted @ 2022-10-25 11:07 Thenext 阅读(154) 评论(0) 推荐(0) 编辑
摘要:DataContoller中的函数FocusedRecordIndex没有反应,FocusedRowIndex正常。 cxgrdtvGrid1DBTableView1.DataController.FocusedRecordIndex := 0; //定位到第一行,排序过滤无反应 cxgrdtvGr 阅读全文
posted @ 2022-04-23 14:35 Thenext 阅读(396) 评论(1) 推荐(0) 编辑
摘要:用法1:在工程中加入控件cxLocalizer; 在程序中加入如下语句: Localizer.LoadFromFile(‘DevLocal.ini‘); Localizer.Language := '中文(简体,中国)'; Localizer.Active := true; 用法2:用DevExpr 阅读全文
posted @ 2022-03-19 09:24 Thenext 阅读(556) 评论(0) 推荐(0) 编辑
摘要:cxSplitter1.CloseSplitter; //收缩 cxSplitter1.OpenSplitter; //展开 阅读全文
posted @ 2022-03-11 15:31 Thenext 阅读(149) 评论(0) 推荐(0) 编辑
摘要:TCXGRID控件:属性:ActiveLevel: 当前层BorderStyle: 窗口风格Color: 颜色FocusedView: 当前View;Font: 字体LevelTabs: 类似PageControls头设置 CaptionAlgnment:标题对齐方式 Images:图标 Style 阅读全文
posted @ 2022-02-28 20:52 Thenext 阅读(477) 评论(0) 推荐(0) 编辑
摘要:用法1:在工程中加入控件cxLocalizer; 在程序中加入如下语句: 1 Localizer.LoadFromFile(‘DevLocal.ini‘); 2 Localizer.Language := '中文(简体,中国)'; 3 Localizer.Active := true; 这个方法很容 阅读全文
posted @ 2021-02-27 20:29 Thenext 阅读(403) 评论(0) 推荐(0) 编辑
摘要://1cxgrid动态创建列 procedure TFrmRuleEdit.CreateCols; var Column: TcxGridDBColumn; begin cdsPowerPrj.First; while not cdsPowerPrj.Eof do begin Column := v 阅读全文
posted @ 2020-11-30 16:57 Thenext 阅读(295) 评论(0) 推荐(0) 编辑
摘要:procedure TfrmsysWorkManage.DBTreeCreateNode(Sender: TObject; Node: TdxOcNode); begin inherited; with Node,WorkCDS do begin Node.ChildAlign := GetNode 阅读全文
posted @ 2020-11-06 16:37 Thenext 阅读(260) 评论(0) 推荐(0) 编辑
摘要:with FDMemTable1 do begin DisableControls; //切断数据感知控件 try Open; //打开 //定义Field fld_Id := TIntegerField(FieldByName('Id')); fld_Value := TStringField(F 阅读全文
posted @ 2020-09-19 23:50 Thenext 阅读(437) 评论(0) 推荐(0) 编辑
摘要:显示效果如下 解决 把每一个字段的options--Filtering 设置为true就可以了。 阅读全文
posted @ 2020-08-21 13:44 Thenext 阅读(209) 评论(0) 推荐(0) 编辑
摘要:由层得到数据表名: 当前记录的top值:cxgrid.Controller.FocusedRow.ViewInfo.Bounds.Top 用代码进行过滤是提示转换bool异常错误: 用代码cxgrid使用过滤时,使用like等表达式,字段类型必须是string类型,不能其他如integer。否则做l 阅读全文
posted @ 2019-03-13 16:41 Thenext 阅读(517) 评论(0) 推荐(0) 编辑
摘要:当从表的数据移动需要和数据源记录同步时,会发生一现象:从表中设定的keyfield记录不连续,显示就会中断。 这样要设置从表的排序,按照主表的关联键在内存表里进行排序 indexFieldNames设置排序字段 阅读全文
posted @ 2019-03-13 16:39 Thenext 阅读(211) 评论(0) 推荐(0) 编辑
摘要:1、对TcxGrid创建多个Level 2、对TcxGrid的TcxGridLevelOptions的TabsForEmptyDetail设置为True 3、再设置DetailTabsPosition的方向为:dtpTop或则dtpLeft 4、cxGrid的rootleveloptions属性下的 阅读全文
posted @ 2019-01-07 21:28 Thenext 阅读(262) 评论(0) 推荐(0) 编辑