DrawBorder(Border,RectangleF) メソッド

指定した範囲の指定した境界線を描画します。

構文

Visual Basic
C#

'宣言
 
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);
}

Visual Basic

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

参照

パラメータ

関連項目