DBGridEh1 but1_Click /// 导出数据xls 到指定文件夹
文章摘要
but1_Click
/// 导出数据xls 到指定文件夹
var
Path: string;
begin
GetDir(0, Path);
SaveDialog1.FileName := '生产排程表_'+ FormatDateTime('yyyymmddhhnn',now()) +'.xls';
ExportDBGridEhToXlsx(DBGridE... but1_Click
/// 导出数据xls 到指定文件夹
var
Path: string;
begin
GetDir(0, Path);
SaveDialog1.FileName := '生产排程表_'+ FormatDateTime('yyyymmddhhnn',now()) +'.xls';
ExportDBGridEhToXlsx(DBGridEh1, Path + '\C_Data\DS\' + SaveDialog1.FileName, []);
if MessageDlg('文件已保存！'#13'是否打开 "' + SaveDialog1.FileName + '" 文件?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then
ShellExecute(Handle, nil, PChar(Path + '\C_Data\DS\' + SaveDialog1.FileName), nil, nil, SW_SHOWNORMAL);
end;
手机扫码阅读
微信或手机浏览器扫一扫，随时随地随心阅读与分享
还没有人赞过，来做第一个
🤞 分享
订阅更新
输入邮箱，第一时间接收本站新文章推送。
版权所有：辰峰微网
文章标题：DBGridEh1 but1_Click /// 导出数据xls 到指定文件夹
文章链接：https://www.14551.cn/Delphi/765.html
版权声明：本站提供的一切软件、教程和内容信息仅限用于学习和研究目的；不得将上述内容用于商业或者非法用途，否则，一切后果请用户自负。本站信息来自网络收集整理，如果您喜欢该程序和内容，请支持正版，购买注册，得到更好的正版服务。我们非常重视版权问题，如有侵权请邮件与我们联系处理。敬请谅解！
文章标题：DBGridEh1 but1_Click /// 导出数据xls 到指定文件夹
文章链接：https://www.14551.cn/Delphi/765.html
版权声明：本站提供的一切软件、教程和内容信息仅限用于学习和研究目的；不得将上述内容用于商业或者非法用途，否则，一切后果请用户自负。本站信息来自网络收集整理，如果您喜欢该程序和内容，请支持正版，购买注册，得到更好的正版服务。我们非常重视版权问题，如有侵权请邮件与我们联系处理。敬请谅解！
发表评论