2013 年 3月 28 日随笔档案 - del88

2013年3月28日

摘要： procedure TForm1.DBGrid1EditButtonClick(Sender: TObject); begin Showmessage(DBGrid1.SelectedField.AsString); end; procedure TForm1.FormCreate(Sender: 阅读全文

posted @ 2013-03-28 19:02 del88 阅读(15) 评论(0) 推荐(0) 编辑

汉化IndicatorTitle下拉式菜单

摘要：打开DBGridEh.pas[版本V5.2]单元文件，找到 EhlibConsts 单元文件名[第3029行]，然后按 Ctrl+Enter 打开相应单元文件，将文中的： SVisibleColumnsEh = 'Visible columns'; SCutEh = 'Cut'; SCopyEh = 阅读全文

posted @ 2013-03-28 18:58 del88 阅读(17) 评论(0) 推荐(0) 编辑

DBGridEh-SaveDBGridEhToExpotFile、LoadDBGridEhFromImportFile

摘要： {$R *.dfm} uses DBGridEhImpExp; //SaveDBGridEhToExportFile可以支持以下五种类型 //TDBGridEhExportAsText //TDBGridEhExportAsCSV //TDBGridEhExportAsHTML //TDBGridE 阅读全文

posted @ 2013-03-28 18:54 del88 阅读(28) 评论(0) 推荐(0) 编辑

DBGRIDEH 去掉网格渐变色

摘要：用一句命令即可： DBGrideh1.OptionsEh:=DBGrideh1.OptionsEh-[dghExtendVertLines]; //去掉网格渐变色去掉前效果：去掉后效果：阅读全文

posted @ 2013-03-28 17:34 del88 阅读(17) 评论(0) 推荐(0) 编辑

汉化DBGridEhFindDlg查找框

posted @ 2013-03-28 17:32 del88 阅读(13) 评论(0) 推荐(0) 编辑

设置dbgrideh的footer

摘要： // // 取得FOOTER的合计值pDbGrid.Columns[1].Footer.SumValue // 比如要将金额转换成中文大写 // unit uFooter; interface uses SysUtils,Graphics,Classes,DBGridEh; // // AFlag= 阅读全文

posted @ 2013-03-28 16:33 del88 阅读(13) 评论(0) 推荐(0) 编辑

导出/导入Tdbgrideh数据

摘要： unit uExport; interface uses DBGridEhImpExp, DBGridEh, SysUtils, Dialogs, ComObj, ActiveX, Variants, db, FormWait; procedure ExpDbgridEh(grid:TDBGridE 阅读全文

posted @ 2013-03-28 15:46 del88 阅读(17) 评论(0) 推荐(0) 编辑

dbgrideh设置可显示列

摘要： unit FormColSelect; interface uses SysUtils, Classes, Controls, Forms, Graphics,uCommFunc, StdCtrls, DBGridEh, CheckLst, Buttons, ComCtrls, ExtCtrls, 阅读全文

posted @ 2013-03-28 15:39 del88 阅读(17) 评论(0) 推荐(0) 编辑