엑셀로 저장하는 프로그램을 구현을 하였습니다.
아래처럼 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;