一、DBGrid 导出csv
procedure OutPutDBGridToCSV(AGrd:TDBGrid; AQuery: TQuery);
var
  i,ColNum: Integer;
  Title,Data,SaveName: String;
  ALst: TStringList;
begin
  try
    ALst:=TStringList.Create;
    ALst.Clear;

ColNum:=0;
    ColNum:=AGrd.Columns.Count-1;

Title:=’’;
    Title:=’"’+AGrd.Columns.Items[0].Title.Caption+’"’;
    for i := 1 to AGrd.Columns.Count-1 do
    begin
      Title:=Title+’,"’+AGrd.Columns.Items[i].Title.Caption+’"’;
    end;
    ALst.Add(Title);

with AQuery do
    begin
      First;
      while not Eof do
      begin
        Data:=’"’+FieldByName(AGrd.Columns.Items[0].FieldName).AsString+’"’;
        for i := 1 to ColNum do
        begin
          Data:=Data+’,"’+FieldByName(AGrd.Columns.Items[i].FieldName).AsString+’"’;
        end;
        ALst.Add(Data);
        Next;
      end;
    end;
    SaveName:=FormatDateTime(‘yyyyMMDDhhmmss’,Now);
    SaveName:=‘C:’+SaveName+’.csv’;
    ALst.SaveToFile(SaveName);
  finally
    ALst.Free;
  end;
  Application.MessageBox(PChar(‘文件保存至’+SaveName),‘系统提示’,64);

end;
————————————————
版权声明:本文为CSDN博主「whoami」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。
原文链接:https://blog.csdn.net/songjunyi0113/article/details/8308124

Delph 表格数据导出方法汇总相关推荐

  1. 将页面中表格数据导出excel格式的文件(vue)

    近期由于项目需要,需要将页面中的表格数据导出excel格式的文件,折腾了许久,在网上各种百度,虽然资料不少,但是大都不全,踩了许多坑,总算是皇天不负有心人,最后圆满解决了. 1.安装相关依赖(npm安 ...

  2. php html转成数组,PHP_php将HTML表格每行每列转为数组实现采集表格数据的方法,本文实例讲述了php将HTML表格每 - phpStudy...

    php将HTML表格每行每列转为数组实现采集表格数据的方法 本文实例讲述了php将HTML表格每行每列转为数组实现采集表格数据的方法.分享给大家供大家参考.具体如下: 下面的php代码可以将HTML表 ...

  3. vue 分页表格数据导出

    vue分页表格数据导出功能,超简单!不用安装不用引入 写个方法即可实现 //导出exportExcel() {let url = "/VueDemo/api/record/export.ht ...

  4. 二、深度学习数据增强方法汇总

    深度学习模型训练数据增强方法汇总 一.随机裁剪 二.RGB-->BGR通道互换 三.仿射变换(缩放) 三.随机旋转 四.对比度调整 五.随机抠图 六.bound box 中心点随机抠图 七.随机 ...

  5. Python Pandas 列数据筛选方法汇总

    Pandas 列数据筛选方法汇总 数据准备: 一.筛选得到指定的列 1.1 根据 label 选择特定的几列 1.2 选择单列的两种方式 1.3 通过正则表达式选择列 二.同时对 行 和 列 进行筛选 ...

  6. python表格怎么复制内容_PyQT5 实现快捷键复制表格数据的方法示例

    本文主要介绍了PyQT5 实现快捷键复制表格数据的方法示例,分享给大家,具体如下: 表格数据如下: # -*- coding:utf-8 -*- import pyperclip from PyQt5 ...

  7. vue项目使用yxg-xlsx-style组件将表格数据导出带有样式的excel文件

    引入组件yxg-xlsx-style 导出excel主要逻辑文件(跟业务无关):excel-style.js import XLSX from 'yxg-xlsx-style'// 如果单元格是日期类 ...

  8. 速达服务器套账维护,速达软件日常数据维护方法汇总107

    日常数据维护方法汇总 20060901 1.软件系列和版本:3000系列8.13版本 问题描述:帐务系统中结转损益后,系统产生的凭证中出现同一科目的一级科目和二级科目多笔金额数,导致报表出现双倍金额数 ...

  9. jQuery表格数据导出成Excel插件

    下载地址 一款能将网页上的Table表格数据导出成Excel文件的插件,这个导出插件使用jQuery代码实现的,很实用的导出Excel插件. dd:

最新文章

  1. 技术网站/博客网址收藏
  2. docker build 指定dockerfile
  3. [云炬创业学笔记]第二章决定成为创业者测试15
  4. OSI/RM 开放系统互联参考模型
  5. CSDN登陆校验码模式识别程序
  6. 基于深度学习的目标检测技术演进:从目标检测到人脸检测
  7. inline函数的用法
  8. setValuesForKeysWithDictionary:的用途
  9. Zend Framework学习之验证ing
  10. Layui 表格table自定义每一列的样式
  11. wireless 大作业 linux,Wire/Wireless Network Configuration in Linux
  12. 鲁大师电脑硬件兼容性测试软件,用鲁大师检测软件检测电脑硬件行得通吗?
  13. git clone 码云仓库项目报错fatal: Authentication failed for ‘https://gitee.com/...‘
  14. Hadoop之HDFS的回收站
  15. mysql 复制方式_MySQL数据库复制表的几种方式讲解
  16. mysql数据库运维月报_微运维weadmin快速上手手册.doc
  17. 利用snmp oid获取交换机型号版本
  18. E-Prime2.0安装问题
  19. Web的组成架构模型
  20. return,return 0 ,return -1 , exit(-1),return 1

热门文章

  1. Centos7 动起来
  2. html简单边框制作--特效文字制作及代码,HTML简单边框制作--特效文字制作及代码...
  3. 金山可牛合并成金山网络 金山毒霸全面免费
  4. P5.js开发之——介绍(1)
  5. 《FineUI秘密花园》在线阅读与完整PDF版
  6. [RFC5996 翻译一] IKEv2 互联网密钥交换协议版本2
  7. 中国联通,真的会有大动作?
  8. 财经管理中的计算机应用第三版实验报告,管理系统中计算机应用实验报告.doc...
  9. android4.4 Camera 框架纵横方向分析
  10. 直接java调用tflite_TFLite基础知识