nativeexcel数据集导出excel
Posted 咏南中间件和开发框架
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了nativeexcel数据集导出excel相关的知识,希望对你有一定的参考价值。
nativeexcel数据集导出excel
uses Dataset2Excel;
procedure Tfdm.exportXLS(dataset: TDataSet);
var
xls: TDataset2Excel;
sd: TSaveDialog;
begin
if dataset = nil then
Exit;
sd := TSaveDialog.Create(nil);
sd.Filter := ‘xls|*.xls‘;
sd.FileName := ‘1.xls‘;
if sd.Execute then
begin
xls := TDataset2Excel.Create(nil);
xls.Dataset := dataset;
xls.WorksheetName := ‘1‘;
xls.SaveDatasetAs(sd.FileName);
xls.Workbook := nil;
xls.Free;
end;
sd.Free;
end;
以上是关于nativeexcel数据集导出excel的主要内容,如果未能解决你的问题,请参考以下文章