Q&A

  • 엑셀프로그램에서요,..
안녕하세요 여기서 많은 정보를 얻고 있는 초보입니다
엑셀로 자료를 보여주는데,,,A라는 사람의 정보를 엑셀파일로 보여준 후 B라는 사람의 자료를 다시 엑셀파일로 보여주는데요,,엑셀이 멈춰버려요

procedure Tpy103fm.PPexcel;
begin
  Excel := TExcel.Create(self);
  fncOpenExcel(Excel, '근로.xls');
  ...
end;

procedure Tpy103fm.P3excel;
begin
  Excel := TExcel.Create(self);
  fncOpenExcel(Excel, '양로.xls');
  ...
end;

function Tpy103fm.fncOpenExcel(excel_src : TExcel; strReportName : string):integer;
begin
    result := -1;
    with excel_src do begin
         Screen.Cursor := crHourGlass;
        try
            Connected := True;
        finally
           Screen.Cursor := crDefault;
        end;
        Exec('[OPEN("' + EXCEL_LOCAL_PATH + strReportName + '")]');
        Exec('[APP.MAXIMIZE()]');
    end;
    result := 1;
end;

이런 식으로 하거든요, 근데 양로라는 엑셀파일은 계속 다른 사람의 자료가 잘 뿌려지고 다시 열리고 하는데 근로라는 엑셀파일만 열면 엑셀프로그램이 멈춰버려요, 델파이프로그램을 닫아야만 엑셀프로그램이 닫히구여 메모리는 written될수 없다는 에러메세지가 나오구여,,,고수님들의 조언 부탁드려요!~~~
0  COMMENTS