Borland Delphi 7 TExcelApplication.Connect는 사무실 컴퓨터에서 작동하지만 클라이언트에서는 작동하지 않습니다.

Question

필자는 필자의 사무실 (파스칼)에서 일부 기존 코드를 유지 관리하고 있으며 제한 사항 때문에 TExcelApplication을 사용하여 Excel에 액세스하려면 델파이 DLL을 작성했습니다. .

dll은 사무실에서 완벽하게 작동하며 컴퓨터는 Microsoft Office 2010, Windows 7 32 비트 및 64 비트를 실행합니다. 클라이언트는 소설 워크 스테이션, Windows XP, Microsoft 2007을 사용하고 있습니다.

dll은 TExcelApplication.Connect가 발생할 때 중단 점 예외를 발생시킵니다. 명령.

앞서 언급 한 차이점 외에도 시나리오는 완전히 동일합니다.

소설 워크 스테이션에서 Microsoft Excel에 액세스하는 것과 관련하여 제한이 있습니까? 아니면 Excel 문서에 액세스하는 더 좋은 방법이 있습니까?

참고 : Excel 문서를 여러 줄, 열 및 스프레드 시트로 읽으려는 경우 원본 Excel 문서는 * .xls 2007 문서입니다.

Excel 문서에 대해 자동 조정 기능을 사용하는 것이 주요 기능이었습니다. 여기

는 라이브러리 코드 당신은 사용 목록에 ActiveX을 추가하고 ActiveX 구성 요소를 초기화하는 CoInitialize(nil);를 사용할 필요가

library MyLibrary; 
uses 
    SysUtils, Classes, Variants, Dialogs, StdCtrls, OleServer, ExcelXP, Windows; 
Type 
    PString=String[254]; 

Var 
    ExcelObj : TExcelApplication; 

Procedure XLSOPEN(THENAME:PSTRING;VAR Reslt:PSTRING); stdcall; 
Begin 
    If FileExists(THENAME) Then 
    Begin 
    ExcelObj := TExcelApplication.Create(nil); 
    ExcelObj.ConnectKind := ckRunningOrNew; 
    ExcelObj.Connect; 

    If ExcelObj=nil Then 
    Begin 
     Result := 'Error : EXCEL couldnt be started!'; 
     Exit; 
    End Else 
    Begin 
     Result := 'Successful'; 
     Exit; 
    End; 
    End Else 
    Begin 
    Result := 'Error : File '+THENAME+' does not exist!'; 
    Exit; 
    End; 
End; 

Exports XLSOPEN Name 'XLSOpen'; 

Begin 
End. 

Answer 1

의 조각입니다. 이유는 Application-> Initialize가 구성 요소를 초기화하기 때문입니다. 이제 dll이기 때문에로드 할 때 구성 요소를 수동으로 초기화하고 dll을 언로드 할 때 UnCoInitizlise;을 사용해야합니다.

USES ActiveX, Windows; 

INITIALIZATION 
    CoInitialize(nil); 
FINALIZATION 
    UnCoInitialize;