在他人的DBGridEh导出到Excel的基础上进行改进，增加功能如下：1、支持多个DBGridEH同时导出到Excel的不同Sheet页2、进度条与数据进度保持一致3、增加了进度百分比显示//调用方法:procedureTForm1.Button1Click(Sender:TObject);varDbOut:TDBGridEhToExcel;i:integer;begintryDbOut:=TDBGridEhToExcel.Create(Self);fori:=0to9do//初始化数组beginDbOut.DBGridEhRecAry[i].TempD