首页
后端开发
Delphi
TMS Flexcel UniDBGrid Excel Export Pascal Source Code

TMS Flexcel UniDBGrid Excel Export Pascal Source Code

21 次浏览 0 条评论
pas
pas

This Pascal source code for TMS Flexcel facilitates exporting UniDBGrid data to Excel. Simply include and execute the following procedure to generate an Excel file without encoding issues:

procedure TfmGeneDataSupplier.UniButton2Click(Sender: TObject);
var
  f: string;
begin
  f := UniServerModule.StartPath + 'ExcelExports' + '供应商TP订单导出- ' + UniMainModule.pSupplierName + '.xlsx';
  DBGridToXLS(f, UniDBGrid1, 1);
  MainForm.uniApplication.UniSession.SendFile(f);
  UserLogs(UniMainModule.LoggedUser, UniApplication.RemoteAddress, 'TP订单导出', 'fmGeneralDataSupplier', '导出文件名：' + f, DateTimeToStr(now()));
end;
pas 文件大小：6.83KB