GrapeCity ActiveReports for .NET 12.0J
DrawBorder(Border,RectangleF) メソッド
使用例 

ページ上に描画するBorderオブジェクト。
境界線を描画するSystem.Drawing.RectangleF座標。
指定した範囲の指定した境界線を描画します。
構文
'宣言
 
Public Overloads Sub DrawBorder( _
   ByVal border As Border, _
   ByVal bounds As RectangleF _
) 
public void DrawBorder( 
   Border border,
   RectangleF bounds
)

パラメータ

border
ページ上に描画するBorderオブジェクト。
bounds
境界線を描画するSystem.Drawing.RectangleF座標。
使用例
private void arv_Load(object sender, System.EventArgs e)
{
    rptDocument rpt = new rptDocument();
    rpt.Run();
    arv.Document=rpt.Document;

    GrapeCity.ActiveReports.Border b = new GrapeCity.ActiveReports.Border();
    b.BottomColor = System.Drawing.Color.Red;
    b.BottomStyle = GrapeCity.ActiveReports.BorderLineStyle.ExtraThickSolid;
    b.LeftColor = System.Drawing.Color.Red;
    b.LeftStyle = GrapeCity.ActiveReports.BorderLineStyle.ExtraThickSolid;
    b.RightColor = System.Drawing.Color.Red;
    b.RightStyle = GrapeCity.ActiveReports.BorderLineStyle.ExtraThickSolid;
    b.TopColor = System.Drawing.Color.Red;
    b.TopStyle = GrapeCity.ActiveReports.BorderLineStyle.ExtraThickSolid;
    
    Single x = 1.0F;
    Single y = 1.0F;
    Single width = 2.0F;
    Single height = 2.0F;
    RectangleF drawRect = new RectangleF(x,y,width,height);

    arv.Document.Pages[0].DrawBorder(b, drawRect);
}
Private Sub arv_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles arv.Load
    Dim rpt As New rptDocument
    rpt.Run()
    arv.Document = rpt.Document
    
    Dim b As New GrapeCity.ActiveReports.Border
    b.BottomColor = System.Drawing.Color.Red
    b.BottomStyle = GrapeCity.ActiveReports.BorderLineStyle.ExtraThickSolid
    b.LeftColor = System.Drawing.Color.Red
    b.LeftStyle = GrapeCity.ActiveReports.BorderLineStyle.ExtraThickSolid
    b.RightColor = System.Drawing.Color.Red
    b.RightStyle = GrapeCity.ActiveReports.BorderLineStyle.ExtraThickSolid
    b.TopColor = System.Drawing.Color.Red
    b.TopStyle = GrapeCity.ActiveReports.BorderLineStyle.ExtraThickSolid
    
    Dim x As Single = 1.0F
    Dim y As Single = 1.0F
    Dim width As Single = 2.0F
    Dim height As Single = 2.0F
    Dim drawRect As New RectangleF(x, y, width, height)
    
    arv.Document.Pages(0).DrawBorder(b, drawRect)
End Sub
参照

関連項目

Page クラス
Page メンバ
オーバーロード一覧

 

 


Copyright © 2003 GrapeCity inc. All rights reserved.