이런 에러는 도저히 못찾겠네요. 선배님들의 고견부탁드립니다. 꾸벅~~~

- 증상
1. 델파이에서 데이타를 엑셀파일로 출력하고, 프로그램을 종료.
2. 파일탐색기에서 엑셀파일을 더블클릭하여 Open하려면 엑셀이 멈춰버림.

- 에러메시지
"0x30033ac2"에 있는 명령이 "0x650918d8"의 메모리를 참조했습니다. 메모리는 "read"될 수 없었습니다.

- 소스
1. 엑셀 생성 및 실행
        XLApp := CreateOleObject('Excel.Application');

        CopyFile('C:엑셀파일.xls',PChar(DirPath),False);
        XLApp.WorkBooks.Open(DirPath);
        XLApp.WorkBooks[1].WorkSheets[sheet_no].Name := Query4.FieldByName('Name').AsString + IntToStr(sheet_no);
        Sheet := XLApp.Workbooks[1].WorkSheets[Query4.FieldByName('Name').AsString+ IntToStr(sheet_no)];


         Sheet.Cells[9,8] := Trim(Query4.FieldByName('Date1').AsString);
         Sheet.Cells[9,9] := Trim(Query4.FieldByName('Date2').AsString);
                                             .
                                             .
                                             .

2. 엑셀 종료
    if not VarisEmpty(XLApp) then begin
         XLApp.DisplayAlerts := false; //변경사항 저장여부 묻지않음
         XLApp.quit; //엑셀 종료
         XLApp := Unassigned;
    end;


선배님들의 답변 부탁드립니다. 읽어주셔서 정말 감사합니다.