Printing.DrawForGraphics メソッド |
任意のGraphicsオブジェクトに、描画します。
宣言 Public Sub DrawForGraphics(ByRef g As Graphics) |
任意のGraphicsオブジェクトに、描画します。
'KsGridでの描画サイズより、やや大きめの Bitmap を用意します。
Dim bmp As Bitmap = New Bitmap(1000,1000)
'Bitmap より Graphics を作成します。
Dim g As Graphics = Graphics.FromImage(bmp)
'この Graphics に KsGrid より描画します。
KsGrid.Printing.DrawForGraphics(g)
'bmp形式で、保存します。
bmp.Save(My.Computer.FileSystem.SpecialDirectories.Desktop & "\test.bmp", Drawing.Imaging.ImageFormat.Bmp)
'上記例では、解像度が低いので、2倍にします。
Dim bmp As Bitmap = New Bitmap(2000,2000)
'Bitmap より Graphics を作成します。
Dim g As Graphics = Graphics.FromImage(bmp)
'ここで、2倍にします。
g.ScaleTransform(2.0F, 2.0F)
'この Graphics に KsGrid より描画します。
KsGrid.Printing.DrawForGraphics(g)
'bmp形式で、保存します。
bmp.Save(My.Computer.FileSystem.SpecialDirectories.Desktop & "\test.bmp", Drawing.Imaging.ImageFormat.Bmp)
著作権 加茂屋株式会社 2015 ( ©Kamoya Corporation 2015) お問い合わせ