Delphi程序，下面的程序各句 各对应的是什么意思

SaveDialog1:=TSaveDialog.Create(Application);
SaveDialog1.Filter:=CVStr('EXCEL文件(*.xls)|*.xls');
if SaveDialog1.Execute then
begin
GetSplash(100,350,20,CVStr('正在导出数据......'));
SaveDBGridEhToExportFile(TDBGridEhExportAsXLS,DBGridEh1,SaveDialog1.FileName+'.xls',True);
end;
SaveDialog1.Free;
freeSplash();

SaveDialog1:=TSaveDialog.Create(Application); //创建一个保存对话框实例
SaveDialog1.Filter:=CVStr('EXCEL文件(*.xls)|*.xls'); // 设置保存对话框的过滤器
if SaveDialog1.Execute then //执行保存对话框，以便用户选择保存路径
begin
GetSplash(100,350,20,CVStr('正在导出数据......')); // 显示用户等待的友好界面
SaveDBGridEhToExportFile(TDBGridEhExportAsXLS,DBGridEh1,SaveDialog1.FileName+'.xls',True); // 将DBGridEH中的数据保存成Excel文件
end;
SaveDialog1.Free; //释放保存对话框实例
freeSplash(); // 关闭用户等待友好界面

虽然我很聪明，但这么说真的难到我了

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息