【文章內(nèi)容簡介】 60。 = 2 39。所有方向的邊距都設(shè)為2 = 2 = New (1, ) 39。設(shè)置邊框 (rt) 39。將文本對象加入到報表Next() 39。預(yù)覽 執(zhí)行效果：你可以刪除這一行，看看執(zhí)行效果有什么不同： = 2 39。所有方向的邊距都設(shè)為2 字體設(shè)置Style有一個子屬性Font，用于設(shè)置對象字體。示例一Dim doc As New PrintDoc 39。定義一個報表Dim rt As New 39。定義一個文本對象 = Hello Foxtable 39。設(shè)置文本對象的內(nèi)容 = 39。水平居中 = New Font(宋體, 16, ) 39。設(shè)置字體(rt) 39。將文本對象加入到報表() 39。預(yù)覽 執(zhí)行結(jié)果：字體設(shè)置是報表設(shè)計中一個經(jīng)常性的工作，為了減輕用戶的編碼工作量，我們特地為Style屬性提供了以下子屬性，用于快捷地設(shè)置字體屬性名稱屬性說明FontName字體名稱FontSize字體大小FontBold邏輯型，字體是否加粗FontItalic邏輯型，字體是否傾斜FontStrikeout邏輯型，是否有刪除線FontUnderline 邏輯型，是否有下劃線示例二Dim doc As New PrintDoc 39。定義一個報表Dim rt As New 39。定義一個文本對象 = Hello Foxtable 39。設(shè)置文本對象的內(nèi)容 = True 39。字體加粗 = 16 39。字體大小為16磅(rt) 39。將文本對象加入到報表() 39。預(yù)覽 排列方式你也許已經(jīng)留意到，在之前的例子中，對象都是從上到下排列的，能不能從左到右，或者先從左到右，到達右邊界之后，再另起一行？答案是肯定的，否則這個報表工具也太“笨”了。所有的容器(包括報表)都有一個Stacking屬性，可以用來改變這種默認的排列方式，該屬性為StackingRulesEnum型枚舉，共有三個可選值： BlockTopToBottom從上到下排列，當(dāng)?shù)竭_下邊界的時候，在垂直方向增加一頁，這是默認值。 BlockLeftToRight從左到右排列，當(dāng)?shù)竭_右邊界的時候，在水平方向增加一頁。 InlineLeftToRight從左到右排列，當(dāng)?shù)竭_右邊界的時候，另起一行繼續(xù)排列，如果到達下邊界，在垂直方向增加一頁。 示例：Dim doc As New PrintDoc() 39。定義一個報表Dim rt As 39。定義一個文本對象 = 39。設(shè)置排列方式For i AS integer = 0 To 10 rt = New () 39。創(chuàng)建文本對象 = Hello Foxtable amp。 i 39。設(shè)置文本對象的內(nèi)容 = 39 39。寬度為39毫米 = 35 39。寬度為35毫米 = 2 39。設(shè)置各個方向的間隔 = New (1, ) 39。設(shè)置邊框 = 39。水平居中 = 39。垂直居中 (rt) 39。將文本對象加入到報表Next() 39。預(yù)覽 執(zhí)行結(jié)果： 默認尺寸在之前的代碼中，我們都明確指定了對象的尺寸，如果我們不指定對象的尺寸，那么會出現(xiàn)什么樣的情況呢？請在命令窗口執(zhí)行下面的代碼：Dim doc As New PrintDoc 39。定義一個報表Dim rt As New 39。定義一個文本對象 = Hello Foxtable 39。設(shè)置文本對象的內(nèi)容 = New (, ) 39。設(shè)置邊框(rt) 39。將文本對象加入到報表() 39。預(yù)覽 這是執(zhí)行效果：可以看到如果沒有明確指定對象的尺寸，那么對象的高度會自動根據(jù)內(nèi)容來確定，而對象的寬度等于容器的寬度。這種默認的特性，會給我們帶來極大的便利，以后你會慢慢體會到。 位置與尺寸在之前所有的例子中，對象都是按順序加入到報表中的，只能通過調(diào)整排列方式以及相互間隔，來間接影響對象的位置。有的時候，我們會需要精確定位，例如單據(jù)套打。精確定位的實現(xiàn)很簡單，先指定對象的坐標(biāo)位置，然后再加入到報表中即可。示例Dim doc As New PrintDoc() 39。定義一個報表Dim rt As 39。定義一個文本對象For i AS integer = 1 To 5 rt = New () 39。創(chuàng)建文本對象 = Hello Foxtable amp。 i 39。設(shè)置文本對象的內(nèi)容 = Auto 39。自動設(shè)置寬度 = i * 10 + 20 39。指定水平位置 = i * 10 + 20 39。指定垂直位置 = New (, ) 39。設(shè)置邊框 (rt) 39。將文本對象加入到報表Next() 39。預(yù)覽 執(zhí)行結(jié)果：坐標(biāo)的單位是毫米，原點為左上角。需要注意的是左邊位置必須大于頁邊距，否則無法顯示和打印。關(guān)于頁面設(shè)置，后面會有專門的章節(jié)講述。詳解位置與尺寸前面已經(jīng)提到過，長度、寬度的單位不是數(shù)值型，其實坐標(biāo)位置也不是數(shù)值型。如果使用數(shù)值型的數(shù)據(jù)，那么單位是毫米，例如： = 25 39。寬度為25毫米你也可以使用表達式來設(shè)置，例如要根據(jù)內(nèi)容自動調(diào)整寬度，可以這樣設(shè)置： = Auto 39。自動設(shè)置寬度你可以在表達式中使用以下對象：對象說明Parent表示對象所在的容器，通常指的就是頁面的可打印區(qū)域，如果對象位于表格中，那么容器就是對象所處的單元格，此外對象RenderArea也是容器，我們會專門介紹它。Parent的屬性：: 容器寬度:容器高度Prev表示上一個對象。Prev的屬性：： 上一個對象的左邊位置: 上一個對象的右邊位置: 上一個對象頂端位置: 上一個對象的底邊位置: 上一對象的寬度: 上一個對象的高度你可以使用百分比來設(shè)置尺寸： = 20% 39。對象寬度為頁面的20% 你還可以進行加減: =40% + 5 39。寬度為頁面寬度的40%加上5毫米。 再例如: = + 5 39。垂直位置為上一對象的底邊之下5毫米 示例Dim doc As New PrintDoc 39。定義一個報表Dim rt As New 39。定義一個文本對象Dim s As Strings = 新華網(wǎng)綿陽5月16日電(記者孫承斌)16日上午，在四川抗震救災(zāi)的s = s amp。 危急時刻，中共中央總書記、國家主席、中央軍委主席胡錦濤乘飛機趕往四川s = s amp。 省地震災(zāi)區(qū)，慰問災(zāi)區(qū)干部群眾，看望奮戰(zhàn)在抗震救災(zāi)第一線的部隊官兵、公s = s amp。 安民警和醫(yī)護人員，指導(dǎo)抗震救災(zāi)工作。 = 胡錦濤抵達四川綿陽慰問 39。設(shè)置文本對象的內(nèi)容 = 39。水平居中 = True 39。字體加粗 = 16 39。字體大小為16磅(rt) 39。將文本對象加入到報表rt = New 39。創(chuàng)建另一個文本對象 = s 39。設(shè)置文本內(nèi)容 = + 5 39。設(shè)置垂直位置(rt) 39。將文本對象加入到報表() 39。預(yù)覽 執(zhí)行結(jié)果：下面的代碼： = + 5 39。設(shè)置垂直位置等同于： = 5雖然用Spacing屬性一樣可以實現(xiàn)，但是直接指定坐標(biāo)位置，對于精確定位來說更靈活。 打印圖片 打印圖片RenderImage類型用于打印圖片，它有一個Image屬性，用于設(shè)置要打印的圖片。示例Dim doc As New PrintDoc 39。定義一個報表對象Dim rm As New 39。定義一個圖片對象 = GetImage() 39。設(shè)置圖片 = New (1, ) 39。設(shè)置邊框(rm) 39。將圖片對象加入報表() 39。預(yù)覽 執(zhí)行結(jié)果：　　 設(shè)置圖片Style有個ImageAlign子屬性，用于設(shè)置圖片的位置和拉伸方式。ImageAlign本身包括以下子屬性：屬性說明AlignHorz水平對齊位置，ImageAlignHorzEnum型枚舉，包括以下可選值：Center: 居中Left： 靠左 Right： 靠右AlignVert垂直對齊位置，ImageAlignVertEnum型枚舉，包括以下可選值：Bottom: 靠底Center：居中Top： 靠上StretchHorz邏輯型，是否在水平方向拉伸，默認為TrueStretchVert邏輯型，是否在垂直方向拉伸，默認為TrueKeepAspectRatio邏輯型，拉伸圖片時，是否保持原始縱橫比例，默認為TrueTileHorz邏輯型，圖片是否在水平方向平鋪，默認為FalseTileVert邏輯型，圖片是否在垂直方向平鋪，默認為False示例一假定我們希望圖片居中：Dim doc As New PrintDoc 39。定義一個報表對象Dim rm As New 39。定義一個圖片對象 = GetImage() 39。設(shè)置圖片 = 39。寬度等于頁面寬度 = Auto 39。高度由圖片大小自動決定 = False 39。禁止圖片水平拉伸 = 39。居中顯示(rm) 39。將圖片對象加入報表() 39。預(yù)覽 執(zhí)行結(jié)果：示例二圖片拉伸控制演示：Dim doc As New PrintDoc 39。定義一個報表對象Dim rm As New 39。定義一個圖片對象39。默認，按比例拉伸 = 40 39。設(shè)置尺寸 = 40 = GetImage() 39。設(shè)置圖片 = 39。居中顯示 = New (1, ) 39。設(shè)置邊框 = 5(rm) 39。將圖片對象加入報表39。不按比例拉伸rm = New 39。定義一個圖片對象 = 40 39。設(shè)置尺寸 = 40 = GetImage() 39。設(shè)置圖片 = False 39。取消保持原有比例 = New (1, ) 39。設(shè)置邊框 = 5(rm) 39。將圖片對象加入報表39。禁止拉伸rm = New 39。定義一個圖片對象 = 40 39。設(shè)置尺寸 = 40 = GetImage() 39。設(shè)置圖片 = New (1, ) 39。設(shè)置邊框 = False 39。禁止拉伸 = False(rm) 39。將圖片對象加入報表() 39。預(yù)覽 執(zhí)行結(jié)果：示例三將圖片拉伸至頁面大小打?。篋im doc As New PrintDoc 39。定義一個報表對象Dim rm As New 39。定義一個圖片對象 = 100%Parent 39。設(shè)置尺寸為容器(頁面)尺寸 = 100%Parent = GetImage() 39。設(shè)置圖片 = False 39。不保持比例(rm) 39。將圖片對象加入報表() 39。預(yù)覽 　 復(fù)雜圖文RenderText對象用于打印文本，該對象中的文本格式是統(tǒng)一的，不能分別設(shè)置。RenderParagraph類型專門用于打印成段文本，而且段落中的文本格式可以不同，甚至可以圖文混排。我們先在命令窗口執(zhí)行下面的代碼，看看RenderParagraph的不同，然后我們再具體說明RenderParagraph。Dim doc As New PrintDoc 39。定義一個報表Dim rpar As New () 39。定義一個段落對象Dim f As New Font(, ) 39。定義一個同樣但加粗的字體(這是一個段落. 現(xiàn)在是正常文本. )(現(xiàn)在的文本是加粗的. , f)(這一句是紅色的. , )(這一句是上標(biāo)形式，上標(biāo)不再是難題. , )(現(xiàn)在字體加粗，而且是紅色. , f, )(現(xiàn)在字體加粗，紅色，而且是下標(biāo)形式. , f, , )(現(xiàn)在又是正常的文本了. )(最后，我們來插入一個圖標(biāo): )(getimage())(.)(rpar)() 39。預(yù)覽報表 執(zhí)行結(jié)果：RenderParagraph有一個屬性Content，表示RenderParagraph的內(nèi)容集合，該屬性有兩個方法，分別是：AddText: 向RenderParagraph中添加文本AddImage：向RenderParagraph添加圖片。AddText的語法:AddText(String)AddText(String, Color)AddText(String, Font)AddText(String, TextPosition)AddText(String, Font, Color)AddText(String, Color, TextPosition)AddText(String, Font, TextPosition)AddText(String, Font, Color, TextPosition)參數(shù)說明： String文本內(nèi)容　 Color文本顏色　 Font字體　 TextPosition文本位置，TextPositionEnum型枚舉，包括三個可選值：Normal: 正常位置Subscript: 下標(biāo)Superscript: 上標(biāo) AddImage的語法：AddImage(Image)參數(shù)說明：Image：要插入的圖片。 換頁控制首先在命令窗口執(zhí)行下面的代碼：Dim doc As New PrintDoc() 39。定義一個報表Dim rt As 39。定義一個文本對象For i AS integer = 0 To 10 rt = New () 39。創(chuàng)建文本對象 = Hello Foxtable 39。設(shè)置文本對象的內(nèi)容 = 40 39。寬度為40毫米 = 40 39。寬度為40毫米 = 3 39。設(shè)置下間隔為3毫米 = New (1, ) 39。設(shè)置邊框 = 39。水平居中 = 39