代码:
FExcel:= CreateOleObject('Excel.Application');
……
……
FExcel.Visible:= True;
窗体关闭 FormCloseQuery 中:
if not varIsEmpty(FExcel) then
begin
FExcel.ActiveWorkBook.Saved:= True;
FExcel.WorkBooks.Close;
FExcel.Quit;
FExcel:=Unassigned;
end;问题:如果程序打开的EXCEL被其他关闭了!那么在窗体退出的时候,FExcel非空,后面代码发生错误!访问非法地址。希望高手指点!
FExcel:= CreateOleObject('Excel.Application');
……
……
FExcel.Visible:= True;
窗体关闭 FormCloseQuery 中:
if not varIsEmpty(FExcel) then
begin
FExcel.ActiveWorkBook.Saved:= True;
FExcel.WorkBooks.Close;
FExcel.Quit;
FExcel:=Unassigned;
end;问题:如果程序打开的EXCEL被其他关闭了!那么在窗体退出的时候,FExcel非空,后面代码发生错误!访问非法地址。希望高手指点!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货