2009-10-23 3 views
1

Delphi 양식에 대한 불량 보고서를 미리 보려면 어떻게해야합니까? 두 페이지로 된 페이지 컨트롤이 있습니다. 첫 번째에는 사용자가 일부 데이터 (이름, 주소 ...)를 입력하고 두 번째 페이지에는 첫 번째 페이지의 데이터로 생성 된 보고서를 미리 보려고합니다.Delphi - 양식에서 Rave 보고서 미리보기

답변

2

당신은 TRvRenderPreview 어떤 TScrollBox에 미리보기를 렌더링 할 수

RvRenderPreview1.ScrollBox := ScrollBox1; // a scrollbox on a TTabSheet 

    RvSystem1.DefaultDest := rdFile; 
    RvSystem1.SystemSetups := RvSystem1.SystemSetups - [ssAllowSetup]; 

    RvSystem1.RenderObject := RvRenderPreview1; 
    RvSystem1.DoNativeOutput := false; 

    RvSystem1.Execute; 
0

필자는 인쇄 미리보기를 사용했으나 정확하지는 않지만 응용 프로그램에서는 충분했습니다. 페이지 컨트롤 안에 포함 할 수 있는지 여부는 알 수 없습니다.

TRvSystem으로 :

2

당신은 TRvSystem 대신 TRvNDRWriter 구성 요소를 사용할 수 있습니다.

procedure TForm1.Button1Click(Sender: TObject); 
begin 
    RvProject1.Execute; 
    RvRenderPreview1.Render; 
end; 

procedure TForm1.FormCreate(Sender: TObject); 
var 
    ms: TMemoryStream; 
begin 
// RvNDRWriter1.StreamMode := smUser; 
// RvRenderPreview1.ScrollBox := ScrollBox1; 
    ms := TMemoryStream.Create; 
    RvNDRWriter1.Stream := ms; 
    RvRenderPreview1.NDRStream := ms; 
end; 
관련 문제