OLE-Excel Verbindung schließen: Excel.exe Prozess bleibt bstehen

[owow]

ein Workaround ist folgendes: eine neue Prozedur erstellen in der alles gemacht wird was voher in btnCreateClick gemacht wurde, diese dann bei btnCreateClick aufrufen

Delphi-Quellcode:

procedure TForm1.create_close;
begin
  try
  try
    ExcelObj:=CreateOleObject('Excel.Application');
    ExcelObj.Visible:= false;
    ExcelObj.DisplayAlerts:=false;
    ExcelObj.UserControl := false;
  except
    on e: exception do
    begin
     ShowMessage(e.Message+#13#10+
      'Kein Excel installiert?');
     exit;
    end;
  end;
 finally
    close_excel;
 end;
 //close_excel;
end;

procedure TForm1.btnCreateClick(Sender: TObject);
begin
 create_close;
 ShowMessage('pause'); //Excel wird nun schon vor dem Klick auf "OK" korrekt beendet
end;

wieso das funktioniert kann ich mir aber noch nicht erklären, habt ihr eine Idee?