2013-07-07 49 views
0

我在德爾福2010年報告,與Rave報告。我的代碼是這樣的:只顯示預覽RaveReport

procedure TMain.ViewReportePrint(Sender: TObject); 
var 
    report: TBaseReport; 
begin 
    report := Sender as TBaseReport; 
    With report do 
    begin 

    SetFont('Arial', 15); 
    GotoXY(1,1); 
    Print('Welcome to Code Based Reporting in Rave'); 
    end; 
end; 

這個工作,但是,顯示窗口,用戶選擇是否,打印報告,預覽和保存到文件。 我喜歡,這個窗口沒有顯示,並直接顯示預覽報告。 這怎麼辦? 謝謝!

回答

0

在TrvSystem組件中,關閉SystemSetups屬性中的ssAllowSetup。即將其值設爲False。