用代码控制按钮,导出电子表格数据出错!
procedure TMainForm.Button2Click(Sender: TObject);
begin
if OpenDialog2.Execute then
DataGrid1.SaveToXLS(OpenDialog2.FileName+'.xls',false);
end;
点击Button2,弹出错误提示:Access violation at address 02704DE2 in module 'CLRModel.bpl'. Read of address 00000030