dbgrideh导入excel提示TDBGridEhExportClass未定义

elapse2010 2005-10-30 08:35:00

做了个按钮把dbgrideh内容导入excel,编译时提示TDBGridEhExportClass未定义,应该怎么定义?

...全文

320 3 打赏收藏转发到动态举报

写回复

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

elapse2010 2005-10-30

打赏
举报

回复

谢谢

xxx168xxx 2005-10-30

打赏
举报

回复

顶楼上的！说的对！

gxgyj 2005-10-30

打赏
举报

回复

在uses中加上 DBGridEhImpExp

本文内容严重参考了网上其他牛人的代码，并做了一些修改，使得参数更加简单，结构更清晰，所以就厚着脸皮说是原创。 procedure TFrm_func.DbGridEhToExcel(ADgEh: TDBGridEh); var ExpClass: TDBGridEhExportclass; Ext: string; FSaveDialog: TSaveDialog; beg

m_strFilePath = m_strFilePath + m_strFilename; TDBGridEhExportClass ExpClass; ExpClass = (TDBGridEhExportAsXLS().ClassType()); SaveDBGridEhToExportFile(ExpClass, m_pclDBGridEh, m_strFilePath, true); ...

我们可以在ehlib 的例子中找到DBGrideh导出数据到文件的代码. procedure TForm1.ppmSaveSelectionClick(Sender: TObject); var ExpClass:TDBGridEhExportClass; Ext:String; begin SaveDialog1.FileName := 'file1'; if (Ac

procedure TFrmdbGridEh.ToolButton2Click(Sender: TObject); var ExpClass:TDBGridEhExportClass; Ext:String; lssavedialog: tsavedialog; begin try lssavedialog := tsavedialog.C...

1.添加合计 dgh_patient.FooterRowCount := 1; // 指定网格尾部统计行行数 dgh_patient.SumList.Active := true; // 激活统计 dgh_patient.FooterColor := clBtnFace ; // 指定统计行颜色 dgh_patient.Columns[...

5,943

社区成员

262,943

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章