報(bào)表設(shè)計(jì)課件

報(bào)表設(shè)計(jì)DELPHI編程QuickReport認(rèn)識(shí)Rave報(bào)表

Rave報(bào)表技術(shù)中的類Rave組件報(bào)表設(shè)計(jì)器QuickReport在Delphi環(huán)境下有許多的報(bào)表組件及工具可以使用，比如：FastReport，QuickReport，ReportBuilder等，而最新的Delphi7中集成的報(bào)表工具為Rave。QuickReport并非Delphi7的默認(rèn)安裝組件，其安裝步驟是

： 選Component，點(diǎn)install

packages

再單擊add，選路徑borland\delphi7\bin， 選中文件dclqrt70.bpl，單擊打開，單擊OK

回目錄頁下一頁QuickReport基本知識(shí)簡單了解各控件功能

1、TquickRep：帶有坐標(biāo)，作為其他報(bào)表控件(如TQRBand)的容器，它的Band屬性可以自動(dòng)添加各種類型的TQRBand2、TQRLabel：打印靜態(tài)的文本（即不是根據(jù)數(shù)據(jù)庫值來改變的），作用象Tlabel，Caption的內(nèi)容就打印出來的內(nèi)容3、TQRDBText：打印數(shù)據(jù)庫字段值，一個(gè)值一行。作用象TDBText.把它的DataSet，DataField分別賦予Table1，Company時(shí)，將打印Table1所指向的表的Company字段的內(nèi)容4、TQRSysData：打印系統(tǒng)信息如時(shí)間，頁碼，報(bào)表頭等回目錄頁下一頁QuickReport基本知識(shí)10、TQRBand：用來確定報(bào)表的不同位置應(yīng)該顯示什么內(nèi)容，它上面可以放控件11、TQRGoups：Groups可以不限級(jí)別的組操作。當(dāng)你連接了幾個(gè)datasets到報(bào)表時(shí)可以通過Groups成組的對dataset進(jìn)行操作回目錄頁下一頁QuickReport基本知識(shí)報(bào)表的控件擺放順序

出現(xiàn)在所有頁上的標(biāo)題(PageHeader)標(biāo)題（只有首頁才有）(Title)所有列的標(biāo)題(ColumnHeader)記錄的內(nèi)容，一個(gè)字段一列(Detail)摘要（最后一頁才有）(Summary)出現(xiàn)在所有頁上的頁腳(PageFooter)以上這些需要根據(jù)設(shè)置不同的Band(不是控件，一種類型而已，在其上面可以放其他控件)來定位。總共有六種Band。回目錄頁下一頁QuickReport基本知識(shí)一個(gè)簡單的例子1．建立一個(gè)新project2．放一個(gè)TTable到Form上，DatabaseName設(shè)為DBDEMOS，TableName指向Customer表，Active設(shè)為true3．放一個(gè)TquickRep控件在Form上，DataSet屬性為Table14．展開TquickRep的Bands屬性，設(shè)HasDetail為true，這時(shí)自動(dòng)增加個(gè)detailband(一個(gè)TQRBand控件，故也可以直接放一個(gè)TQRBand控件，BandType屬性設(shè)為detail就行了)這個(gè)例子制作打印一張表的部分字段名及該字段數(shù)據(jù)內(nèi)容回目錄頁下一頁QuickReport基本知識(shí)5．放一個(gè)TQRDBText控件在detailband上面，設(shè)DataSet指向Table1，DataField指向Company。第四步是設(shè)置在報(bào)表的什么位置顯示什么類型的數(shù)據(jù)，而TQRDBText則具體實(shí)現(xiàn)6．選TquickRep控件，按右鍵，選擇”Preview”預(yù)覽，應(yīng)該看到表Customer的字段Company的所有字段值到此這一個(gè)簡單的例子就OK了，程序?qū)崿F(xiàn)預(yù)覽及利用TQRuickRep自帶的打印功能只須在Form中加一個(gè)按鈕，它的OnClick事件為：QuickRep1->Preview()回目錄頁下一頁QuickReport基本知識(shí)接著添加一個(gè)groupfooterband，添加時(shí)，放一個(gè)TQRBand控件在報(bào)表上，連接TQRGroups的FooterBand屬性到這個(gè)QRBand，這時(shí)這個(gè)新建的TQRBand就成為GroupFooter.（TQRGroup的一個(gè)重要特性是表達(dá)式，任何時(shí)候當(dāng)表達(dá)式的值變時(shí)Group都將中斷，如表達(dá)式是按省列出城市名，當(dāng)前列出廣東省，當(dāng)屬于該省的城市列完后，表達(dá)式值改變，這時(shí)Group中斷，接著顯示其他省的城市名。）TQRGroups的Expression屬性設(shè)為Query1.State(根據(jù)不同的州來中斷)5.放一個(gè)TQRBand控件在報(bào)表上，BandType為rbDetail回目錄頁下一頁QuickReport基本知識(shí)QuickReport條件式打印

可以直接在TQuickReport的OnFilter事件中寫明條件判斷，OnFilter事件的引數(shù)中有一個(gè)PrintRecordBoolean型變量，將這個(gè)變量設(shè)為True(預(yù)設(shè)值)，該記錄便會(huì)印出；反之，設(shè)為False，就不印出這條記錄.回目錄頁下一頁認(rèn)識(shí)Rave報(bào)表本范例之路徑均為示范之用，請用鼠標(biāo)器右鍵點(diǎn)按圖標(biāo)后，在快捷菜單中選擇「動(dòng)作設(shè)定/跳到」，更改為您所需要之路徑。

Delphi7中實(shí)現(xiàn)報(bào)表的方法稱為Rave，將Rave報(bào)表組件添加到應(yīng)用中后，就可以創(chuàng)建各種類型的報(bào)表Rave報(bào)表的特點(diǎn)帶字回繞功能圖形化頁邊距調(diào)整精確頁面位置控制打印配置字體控制打印預(yù)覽重復(fù)使用PDF、HTML、RTF和文本格式回目錄頁下一頁認(rèn)識(shí)Rave報(bào)表Rave報(bào)表入門1、在窗體上放置一個(gè)Ttable組件，設(shè)置它和DBDEMOS表中的animals.dbf表相關(guān)聯(lián)2、窗體上放置一個(gè)TRvDataSetConnection組件，將其DataSet屬性設(shè)置成TTable1[該組件在Rave面板上]3、選擇[Tools/RaveDesigner]啟動(dòng)報(bào)表設(shè)計(jì)器4、選擇報(bào)表設(shè)計(jì)器的菜單項(xiàng)[DataObject]、選擇數(shù)據(jù)連接對話框的[DirectDataView]，單擊[Next]、選擇TRvDataSetConnection1，然后單擊[Finish]回目錄頁下一頁認(rèn)識(shí)Rave報(bào)表5、選擇[Tools/ReportWizards/SimpleTable]，在簡單報(bào)表設(shè)計(jì)向?qū)е羞x擇[DataView1]，單擊[Next]，選擇字段、字段順序等，最后單擊[Generate]，完成報(bào)表設(shè)計(jì)，保存此設(shè)計(jì)，名為myrave.rav6、最小化報(bào)表設(shè)計(jì)器，回到Delphi7，在窗體上放置TRvProject組件，將其ProjectFile屬性選擇剛創(chuàng)建的myrave.rav7、在窗體上增加一個(gè)按鈕，添加單擊事件過程｛Rvprogject1.Execute;｝8、執(zhí)行后如果發(fā)現(xiàn)有重疊，回到報(bào)表設(shè)計(jì)器，將重疊的部分拖開，將報(bào)表的標(biāo)題修改一下，保存工程，即可回目錄頁下一頁Rave報(bào)表技術(shù)中的類回目錄頁TBaseReport類該類是所有能夠產(chǎn)生報(bào)表的類的主要祖先類，它定義的屬性、方法和事件被所有輸出組件所使用，在程序中可直接和TBaseReport類的對象用代碼交互TBaseReport類的類層次如下圖下一頁Rave報(bào)表技術(shù)中的類其主要屬性如下：AbortedAccuracyMethodAscentHeightBinsBKColorBoldBottomWasteBoxLineColorCanvasColumnsDeviceNameDevModeDriverNameFramemodePort回目錄頁下一頁Rave報(bào)表技術(shù)中的類3．AscentHeight定義為：propertyAscentHeight：double；返回字體離基線的高度。4．Bins定義為：propertyBins：TStrings；本屬性用于返回一個(gè)TStringList對象，該對象包含當(dāng)前打印機(jī)所有有效的打印機(jī)任務(wù)緩沖區(qū)。5．BKColor定義為：propertyBKColor：TColor；用于設(shè)定或返回文本輸出的背景色。6．Bold定義為：propertyBold：boolean；確定字體是否加粗。

回目錄頁下一頁Rave報(bào)表技術(shù)中的類7．BottomWaste定義為：propertyBottomWaste：double；本屬性返回頁面下邊打印機(jī)不能打印到的區(qū)域。8．BoxLineColor定義為：propertyBoxLineColor：TColor；用于設(shè)置標(biāo)簽框的邊緣顏色。9．Canvas定義為：propertyCanvas：TCanvas；返回畫布對象。10．Columns定義為：propertyColumns：integer；本屬性用于返回在調(diào)用SetColumns和SetColumnWidth方法后列的數(shù)量。

回目錄頁下一頁Rave報(bào)表技術(shù)中的類15．FrameMode定義為：propertyFrameMode：TFrameMode；用于確定在圖形(如矩形和橢圓)的周圍繪制邊界時(shí)的方式。16．Port定義為：propertyPort：string；返回當(dāng)前打印機(jī)的端口名?；啬夸涰撓乱豁揜ave報(bào)表技術(shù)中的類其他報(bào)表類1、TCanvasReport類該類由TBaseReport派生而來。該類實(shí)現(xiàn)了中的很多抽象方法，并將這些方法與Tcanvas的方法聯(lián)系起來，很多輸出組件都用到這些方法TCanvasReport類的類層次如下圖回目錄頁下一頁Rave報(bào)表技術(shù)中的類3、TDBMemoBuf類該類通過屬性Field和RTFField為TMemoBuf增加了處理TMemoField類型的數(shù)據(jù)的能力TDBMemoBuf類的類層次如下圖回目錄頁下一頁Rave報(bào)表技術(shù)中的類4、TRpBaseComponent類該類是Rave中所有和輸出有關(guān)的組件的祖先類。與輸出無關(guān)的組件都是類TrpComponent派生出來的TRpBaseComponent類的類層次如下圖回目錄頁下一頁Rave報(bào)表技術(shù)中的類5、TRpComponent類該類是所有Rave組件的祖先類TRpComponent類的類層次如下圖回目錄頁下一頁Rave報(bào)表技術(shù)中的類7、TRpRenderCanvas類該類提供了向Tcanvas的連接，TRvRenderPrinter和TRvRenderPreview即由TRpRenderCanvas派生。其中前者用于打印，后者用于預(yù)覽TRpRenderCanvas類的類層次如下圖回目錄頁下一頁Rave組件回目錄頁下一頁TRvProject組件TrvProject組件由TRpComponent組件派生而來，是訪問Rave可視化報(bào)表的手段。通常應(yīng)用程序中只有一個(gè)TRvProject組件，如果必要的話也可以有多個(gè)。RvProject組件的ProjectFile屬性指明了應(yīng)用程序保存報(bào)表定義的Rave項(xiàng)目文件，這種項(xiàng)目文件的擴(kuò)展名一般是．rav，盡管是一個(gè)文件，但是Rave項(xiàng)目可以保存各種報(bào)表的定義。當(dāng)調(diào)用了TRaveReport的Open方法后，Rave項(xiàng)目文件將被裝入內(nèi)存以準(zhǔn)備顯示或打印。在關(guān)閉應(yīng)用程序之前必須關(guān)閉Rave項(xiàng)目文件，這可以通過調(diào)用Close方法來實(shí)現(xiàn)。若對報(bào)表的定義做了修改，可以調(diào)用Save方法加以保存。

Rave組件TRvProject組件的主要屬性

1．Active定義為：propertyActive：Boolean；確定TRvProject是否是活動(dòng)的。2．DLLFile定義為：propertyDLLFile：string；指明當(dāng)LoadDesigner屬性為真的時(shí)候要使用的DLL文件名。在利用Rave技術(shù)設(shè)計(jì)報(bào)表的時(shí)候，終端用戶文件要么是RavePack，要么是RaveSoloDLL，這取決于是否使用包。

回目錄頁下一頁Rave組件3．Engine定義為：propertyEngine：TRpComponent；本屬性使得用戶可以定義一個(gè)報(bào)表引擎，該報(bào)表引擎在通過TRvProject組件打印報(bào)表的時(shí)候使用，若這個(gè)屬性沒有被定義，一個(gè)默認(rèn)的TRvSystem將會(huì)被創(chuàng)建以填補(bǔ)該屬性，TRvNDRWriter對象和TRvSystem對象都可以賦給這個(gè)屬性。

4．LoadDesigner定義為：propertyLoadDesigner：boolean；本屬性確定終端用戶設(shè)計(jì)器是不是將要被裝入。若LoadDesigner為真，則在DLLFile屬性中指定的文件將被裝入。終端用戶文件通常是RavePack或RaveSoloDLL，具體的類取決于是否使用了包。

回目錄頁下一頁Rave組件5．ProjectFile定義為：propertyProjectFile：string；指明Rave項(xiàng)目文件，當(dāng)TRvProjec被打開的時(shí)候載入。6．RaveBlobDateTime定義為：propertyRaveBlobDateTime：TDateTime；用于返回一個(gè)報(bào)表項(xiàng)目被載入到應(yīng)用程序窗體中的時(shí)間7．ReportDesc定義為：propertyReportDesc：string；可以通過三種方式描述一個(gè)Rave報(bào)表，這就是name(名字)，fullname(全名)和description（描述）。其中name是沒有空格和特殊字符的標(biāo)準(zhǔn)類型名，fullname有些像小標(biāo)題，能夠更好地說明報(bào)表，而description可以提供對報(bào)表的詳盡而全面的描述。ReportDesc屬性用于返回對當(dāng)前選中的報(bào)表的description信息?；啬夸涰撓乱豁揜ave組件8．ReportFullName定義為：propertyReportFullName：string；返回當(dāng)前選中報(bào)表的fullname信息。9．ReportName定義為：propertyStoreRAV：boolean；返回當(dāng)前選中報(bào)表的name信息。10．StoreRAV定義為：propertyStoreRAV：boolean；本屬性可返回一個(gè)報(bào)表項(xiàng)目文件是可執(zhí)行的還是不可執(zhí)行的?；啬夸涰撓乱豁揜ave組件TRvProiect組件的主要方法1．ClearRaveBlob定義為：procedureClearRaveBlob；本方法用于清除當(dāng)前應(yīng)用程序窗體上載入的報(bào)表項(xiàng)目。2．Close定義為：procedureClose；用于關(guān)閉報(bào)表項(xiàng)目文件，并從內(nèi)存中卸載。若調(diào)用了TRvProject的Open方法，則在應(yīng)用程序退出前務(wù)必調(diào)用本方法。3．Design定義為：procedureDesign；用于啟動(dòng)Rave報(bào)表的可視化設(shè)計(jì)器以設(shè)計(jì)當(dāng)前報(bào)表。

回目錄頁下一頁Rave組件4．DesignReport定義為：procedureDesignReport(ReportName：string)；本方法也可以啟動(dòng)Rave報(bào)表的可視化設(shè)計(jì)器，但不一定用來設(shè)計(jì)當(dāng)前報(bào)表，也可以設(shè)計(jì)指定的報(bào)表，可以利用屬性ReportName指定將要設(shè)計(jì)的報(bào)表。若想通過報(bào)表的全名設(shè)計(jì)報(bào)表，則可以先調(diào)用SelectReport方法，然后調(diào)用Design方法。5．Execute定義為：procedureExecute；本方法用于啟動(dòng)當(dāng)前選定的Rave報(bào)表的打印。6．ExecuteReport定義為：procedureExecuteReport(ReportName：string)；本方法用于啟動(dòng)用ReportName參數(shù)指定的報(bào)表的執(zhí)行。

回目錄頁下一頁Rave組件7．GetReportCategoryList定義為：procedureGetReportCategoryList(ReportList：Tstrings;Categories：Tstrings;FullName：boolean)；本方法用于取得所有滿足一定條件的報(bào)表，例如Accounting(會(huì)計(jì)報(bào)表)、General(通用報(bào)表)、Status(狀態(tài)報(bào)表)和System(系統(tǒng)報(bào)表)。若想得到除系統(tǒng)報(bào)表之外的其他報(bào)表的列表，可以這樣調(diào)用本方法：RvProject1．GetReportCategoryList(ReportList,’Accounting；Status；Genera；；’)如果設(shè)置FullName屬性為真，上面的調(diào)用就會(huì)返回當(dāng)前報(bào)表項(xiàng)目中所有報(bào)表的全名，如果FullName屬性為假，則會(huì)返回所有報(bào)表的name。回目錄頁下一頁Rave組件8．LoadFromFile定義為：procedureLoadFrom：string)；本方法用于從文件中載入報(bào)表項(xiàng)目文件，項(xiàng)目文件由參數(shù)指出。9．LoadFromStream定義為：procedureLoadFromStream(Stream：TStream)；用于從流中載入報(bào)表項(xiàng)目文件。10．LoadRaveBlob定義為：procedureLoadRaveBlob(Stream：TStream)；用于將流中存儲(chǔ)的報(bào)表項(xiàng)目文件載入到應(yīng)用程序的窗體上?；啬夸涰撓乱豁揜ave組件11．Open定義為：procedureOpen；用于打開報(bào)表項(xiàng)目文件。12．ReportDescToMemo定義為：procedureReportDescToMemo(Memo：TCustomMemo)；將參數(shù)Memo指出的Memo組件初始化成當(dāng)前選定的報(bào)表的描述。13．Save定義為：procedureSave；用于保存報(bào)表項(xiàng)目文件。

回目錄頁下一頁Rave組件TRvSystem組件TrvSystem組件是一個(gè)功能非常強(qiáng)大的組件，

在某種程度上它可以看成是TRvRenderPreview組件、TRvRenderPrinter組件和TRvNDRWriter組件的合成。使用TRvSystem組件可以輕易地將報(bào)表發(fā)送到打印機(jī)或預(yù)覽屏幕?；啬夸涰撓乱豁揜ave組件TRvSystem組件的主要屬性

1．BaseReport定義為：propertyBaseReport：TbaseReport用于訪問TRvSystem組件生成的TBaseReport組件(所有輸出組件的基類)。在調(diào)用Execute方法之前，BaseReport為空。2．DefaultDest定義為：propertyDefaultDest：TReportDest；確定默認(rèn)的報(bào)表輸出目的設(shè)備，可以是rdFile、rdPreview和rdPrinter，分別用于代表文件、屏幕預(yù)覽和打印機(jī)。

回目錄頁下一頁Rave組件3．GridHoriz定義為：propertyGridHoriz：double；用于確定顯示文字時(shí)網(wǎng)格水平空間的大小。4．GridPen定義為：propertyGridPen：TPen；繪制網(wǎng)格時(shí)的畫筆。5．Output定義為：propertyOutput：T；輸出文件的名字。6．ReportDest定義為：propertyReportDest：TReportDest；用戶設(shè)定的報(bào)表輸出設(shè)備?；啬夸涰撓乱豁揜ave組件7．RulerType定義為：propertyRulerType：TRulerType；確定在預(yù)覽時(shí)產(chǎn)生何種標(biāo)尺。8．SystemOptions定義為：propertySystemOptions：TSystemOptions；TRvSystem的配置可被設(shè)置成：soUseFiler總是將報(bào)表發(fā)送到報(bào)表文件。soWaitForOK確定當(dāng)報(bào)表生成后，用戶是否要單擊[OK]按鈕才能輸出。soShowStatus確定正在生成報(bào)表的過程中是否出現(xiàn)狀態(tài)屏幕。soAllowPrintFromPreview確定用于能否在預(yù)覽屏幕中打印報(bào)表。soPreviewModal確定預(yù)覽屏幕是否是模態(tài)的。soNoGenerate確定RvSystem組件是否越過報(bào)表生成過程而直接進(jìn)入屏幕或打印機(jī)。

回目錄頁下一頁Rave組件其他報(bào)表組件TRvNDRWriter組件該組件由TBaseReport派生而來，一般和TRvRenderPrinter組件與TRvRenderPreview組件聯(lián)合使用，可將一個(gè)報(bào)表存成特殊的二進(jìn)制格式以便打印和預(yù)覽。

RvCustomConnection組件用于在非數(shù)據(jù)庫應(yīng)用程序中為Rave報(bào)表提供數(shù)據(jù)。

回目錄頁下一頁Rave組件TRvDataSetConnection組件用于訪問TDataSet組件或由TDataSet派生出來的其他組件，提供Rave報(bào)表和數(shù)據(jù)源之間的連接。TRvTableConnection組件用于訪問TTable組件或由TTable派生出來的其他組件，提供Rave報(bào)表和數(shù)據(jù)源之間的連接。

TRvQueryConnection組件用于訪問TQuery組件或由TQuery派生出來的其他組件，提供Rave報(bào)表和數(shù)據(jù)源之間的連接。

回目錄頁下一頁Rave組件TRvRenderPreview組件該組件能夠?qū)RvNDRWriter組件生成的一種特殊的二進(jìn)制文件(NDR文件)發(fā)送到屏幕或打印機(jī)。可以利用TRvRenderPreview組件的屬性、方法和事件創(chuàng)建完全個(gè)性化的用戶界面。TRvRenderPrinter組件該組件能將TRvNDRWriter產(chǎn)生的NDR文件發(fā)送到打印機(jī)，用于在預(yù)覽窗中進(jìn)行打印。TRvRenderPDF組件該組件用于將NDR流或文件轉(zhuǎn)成PDF格式，支持文本和圖形?；啬夸涰撓乱豁揜ave組件TRvRenderHTML組件該組件用于將NDR流或文件轉(zhuǎn)成HTML(HTML4．0)圖形。TRvRenderRTF組件該組件用于將NDR流或文件轉(zhuǎn)成RTF格式，支持文本和圖形。TRvRenderText該組件用于將NDR流或文件轉(zhuǎn)成文本格式?；啬夸涰撓乱豁搱?bào)表設(shè)計(jì)器回目錄頁下一頁報(bào)表設(shè)計(jì)器概述可以從Delphi[Tools]啟動(dòng)報(bào)表設(shè)計(jì)器報(bào)表設(shè)計(jì)器的開發(fā)環(huán)境可以定制，方法是單擊[Edit/Prefrences]按鈕報(bào)表設(shè)計(jì)器使用報(bào)表項(xiàng)目管理報(bào)表，一個(gè)報(bào)表項(xiàng)目中可以含有多個(gè)報(bào)表，而一個(gè)報(bào)表中能包含多個(gè)報(bào)表頁(Page)報(bào)表頁可以分為兩種：普通報(bào)表頁：只能在一個(gè)報(bào)表中使用全局報(bào)表頁(GlobalPage)：可以在所有的報(bào)表中使用報(bào)表設(shè)計(jì)器數(shù)據(jù)視圖的創(chuàng)建(1)選擇[DataObject]菜單項(xiàng)，在彈出的對話框中選擇DatabaseConnection(2)將連接類型選擇成BDE，單擊[Finish]按鈕，在彈出的對話框中設(shè)置數(shù)據(jù)庫的別名，單擊[OK]，至此就創(chuàng)建了一個(gè)數(shù)據(jù)庫的連接(3)選擇[DataObject]菜單項(xiàng)，在彈出的窗口中選擇DriverDataView，單擊[Next]按鈕，在彈擊的對話框中選擇剛才建立的連接Database1，單擊[Finish]按鈕回目錄頁下一頁報(bào)表設(shè)計(jì)器(4)系統(tǒng)彈出查詢設(shè)計(jì)器界面，選中一個(gè)表，并選中所需要的字段(5)對上一步的選擇，系統(tǒng)已經(jīng)自動(dòng)生成了對應(yīng)的SQL語句，可以單擊[Editor]查看，單擊[Designer]返回到查詢設(shè)計(jì)器，并切換到Sorting&Grouping標(biāo)簽，選擇用于排序和分組的字段，單擊[OK]回目錄頁下一頁報(bào)表設(shè)計(jì)器利用報(bào)表向?qū)?chuàng)建報(bào)表(1)選擇報(bào)表設(shè)計(jì)器的菜單項(xiàng)[Tools/ReportWizards/SimpleTable]，選擇已創(chuàng)建的數(shù)據(jù)視圖，然后單擊[Next](2)單擊[All]選擇顯示所有的字段，并單擊[Next](3)采用默認(rèn)的列顯示順序，采用默認(rèn)的報(bào)表布局信息(4)采用默認(rèn)的報(bào)表字體，最后單擊[Generate]報(bào)表，修改報(bào)表的標(biāo)題(5)選