Delphi의 Windows 서비스에서 QuickReport를 사용하여 PDF를 생성하십시오.

Question

저는 Delphi XE3을 사용하여 Windows 서비스를 작성하고 있습니다. 이 서비스는 데이터베이스에서 읽으며 quickreport 5.05.1을 사용하여 pdf를 생성합니다. TQRPDFDocumentFilter를 사용하여 pdf를 생성 할 계획입니다.

모든 것이 정상적인 VCL 응용 프로그램에서 정상적으로 작동하지만 Windows 서비스에서 구현할 때 QuickRep.Prepare를 수행하면 서비스가 중단됩니다 (예외없이).

나는 Windows 서비스에서 QuickReport를 사용할 수 있다는 것을 읽었지만 어떻게해야할지 모르겠다. 어떤 제안?

는 어디 코드입니다 :

procedure foo 
var 
pdfFilter: TQRPDFDocumentFilter; 
begin 
    with TForm2.Create(Self) do 
    begin 
    ClientDataSet1.Open; 
    QuickRep1.Prepare; 
    pdfFilter := TQRPDFDocumentFilter.Create(GetApplicationFolder() + 'test.pdf'); 
    try 
     QuickRep1.QRPrinter.ExportToFilter(pdfFilter); 
    finally 
     pdfFilter.Free; 
     ClientDataSet1.Close; 
    end; 
    end; 
end; 

편집 : 다른 스레드에서 제안 나는 또한 퀵 리포트에 "쇼의 진행 상황을"해제 시도 . 예외를 잡기 위해 일부 코드를 작성하면 실제로 예외가 있음을 알 수 있습니다. 메시지는 "현재 선택된 기본 프린터가 없습니다"입니다. 그러면 서비스가 실행중인 로컬 시스템 사용자에게 프린터가 설치되어 있지 않고 이것이 문제가된다고 생각됩니다.

Answer 1

나는이 단계 (Windows 서비스로 실행하는 자바 서버에서 공유 네트워크 프린터로 인쇄) 비슷한 문제를 해결 한 :

• 로그에서 서비스를 실행할 사용자로
• 프린터를 설치하십시오. 델파이 응용 프로그램과 함께

IIRC를 사용할 경우 프린터 이름은 대소 문자를 구분하지 않습니다 (Java의 경우).