PowerTools SPREAD for Windows Forms 10.0J
GetOwnerPrintInfo メソッド


印刷を処理する Graphics オブジェクト
印刷する領域を表す矩形領域
印刷するシート
特定のシートを指定した矩形に印刷するために必要な印刷情報を取得します。
構文
'Declaration
 
Public Function GetOwnerPrintInfo( _
   ByVal g As Graphics, _
   ByVal rect As Rectangle, _
   ByVal sheet As Integer _
) As OwnerPrintInfo
'使用法
 
Dim instance As FpSpread
Dim g As Graphics
Dim rect As Rectangle
Dim sheet As Integer
Dim value As OwnerPrintInfo
 
value = instance.GetOwnerPrintInfo(g, rect, sheet)
public OwnerPrintInfo GetOwnerPrintInfo( 
   Graphics g,
   Rectangle rect,
   int sheet
)

パラメータ

g
印刷を処理する Graphics オブジェクト
rect
印刷する領域を表す矩形領域
sheet
印刷するシート
次のサンプルコードは、ページ数を取得します。
//Add a PrintDocument control
 private void Form1_Load(object sender, EventArgs e)
        {
            fpSpread1.Sheets.Count = 2;
            fpSpread1.Sheets[0].Cells[0, 0].Value = "test";
            fpSpread1.Sheets[0].Cells[8, 0].Value = "test";
            fpSpread1.Sheets[0].Cells[15, 0].Value = "test";
            fpSpread1.Sheets[0].Cells[0, 15].Value = "column";
            fpSpread1.Sheets[1].Cells[0, 0].Value = "test";          
        }

        private void button1_Click(object sender, EventArgs e)
        {
            printDocument1.Print();
        }
 
        private void printDocument1_PrintPage(object sender, System.Drawing.Printing.PrintPageEventArgs e)
        {
            Rectangle rect;
            rect = new Rectangle(0, 0, 100, 100);
            fpSpread1.OwnerPrintDraw(e.Graphics, rect, 0, 1);
            listBox1.Items.Add(fpSpread1.GetOwnerPrintInfo(e.Graphics, rect, 0).PageCount);

            Rectangle rect1;
            rect1 = new Rectangle(0, 200, 100, 100);
            fpSpread1.OwnerPrintDraw(e.Graphics, rect1, 1, 1);
        }
'Add a PrintDocument control
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        FpSpread1.Sheets.Count = 2
        FpSpread1.Sheets(0).Cells(0, 0).Value = "test"
        FpSpread1.Sheets(0).Cells(8, 0).Value = "test"
        FpSpread1.Sheets(0).Cells(15, 0).Value = "test"
        FpSpread1.Sheets(0).Cells(0, 15).Value = "column"
        FpSpread1.Sheets(1).Cells(0, 0).Value = "test"
    End Sub

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        PrintDocument1.Print()
    End Sub

    Private Sub PrintDocument1_PrintPage(sender As Object, e As Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
        Dim rect As Rectangle
        rect = New Rectangle(0, 0, 100, 100)
        FpSpread1.OwnerPrintDraw(e.Graphics, rect, 0, 1)
        ListBox1.Items.Add(FpSpread1.GetOwnerPrintInfo(e.Graphics, rect, 0).PageCount)

        Dim rect1 As Rectangle
        rect1 = New Rectangle(0, 200, 100, 100)
        FpSpread1.OwnerPrintDraw(e.Graphics, rect1, 1, 1)
    End Sub
参照

FpSpread クラス
FpSpread メンバ

 

 


© 2004-2017, GrapeCity inc. All rights reserved.