Q&A

  • Excel 파일로 저장하기 위해 Excel을 호출했으나, 종료시킬 방법을 모릅니다
엑셀로 저장하는 프로그램을 구현을 하였습니다.

아래처럼 DB의 내용을 저정을 하였습니다. 근데 이것이 프로그램이 실행상태에서 엑셀로 저장을 하면 메모리에 엑셀실행화일이 떠 있습니다.

그래서 프로그램이 실행중일때는 그 생성한 화일을 열수가 없습니다.

프로그램을 종료를 해야지만이 열수가 있습니다.

이것을 어떤 방법으로 해결을 할수 있나요..

프로그램 실행중에도 열고 싶은데...

알려주세요.



프로그램을 종료하지 않고 엑셀을 메모리에서 해제하는 방법을 알려주세요.







for i := 0 to Table1.RecordCount - 1 do begin

for j := 0 to Table1.FieldCount - 1 do begin

Sheet.Cells[i + 1, j + 1] := Table1.Fields[j].AsString;

end;

table1.Next;

Inc(CurLine);

Inc(Cnt);

ProgressBar1.Position := (Cnt * 100) div DBGrid1.DataSource.DataSet.RecordCount;

end;

XLApp.ActiveWorkBook.SaveAs('c:worktest.xls');



if not VarIsEmpty(XLApp) then begin

XLApp.DisplayAlerts := false;

XLApp.Quit;

end;

frm_auto_err := nil;

0  COMMENTS