为何用了excelapp := unassigned 依然无法释放内存 ( 积分: 100 )

  • 主题发起人 主题发起人 jackjiao
  • 开始时间 开始时间
J

jackjiao

Unregistered / Unconfirmed
GUEST, unregistred user!
为何用了excelapp := unassigned 依然无法释放内存。
我用的是delphi7 + excel200
我的程序如下:
var
ExcelApp: Variant;
begin
ExcelApp := Unassigned;
ExcelApp := CreateOleObject( 'Excel.Application' );
try
ExcelApp.WorkBooks.Open(OpenDialog1.FileName);
ExcelApp.WorkSheets[1].Activate;
....
....
finally
ExcelApp.WorkBooks.Close;
ExcelApp.Quit;
ExcelApp := Unassigned;
end;

按说执行完后,excel会退出。
可是程序退出后,在任务管理器中EXCEL依然驻留在内存中。
 
为何用了excelapp := unassigned 依然无法释放内存。
我用的是delphi7 + excel200
我的程序如下:
var
ExcelApp: Variant;
begin
ExcelApp := Unassigned;
ExcelApp := CreateOleObject( 'Excel.Application' );
try
ExcelApp.WorkBooks.Open(OpenDialog1.FileName);
ExcelApp.WorkSheets[1].Activate;
....
....
finally
ExcelApp.WorkBooks.Close;
ExcelApp.Quit;
ExcelApp := Unassigned;
end;

按说执行完后,excel会退出。
可是程序退出后,在任务管理器中EXCEL依然驻留在内存中。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
781
import
I
I
回复
0
查看
544
import
I
后退
顶部