ActiveReports 9
Draw(Graphics,RectangleF) Method
Example 

Graphics object to render on the page.
System.Drawing.RectangleF coordinates to which to draw the page.
Renders the page's content to the specified Graphics object at the specified coordinates.
Syntax
'Declaration
 
Public Overloads Sub Draw( _
   ByVal graphics As Graphics, _
   ByVal bounds As RectangleF _
) 
public void Draw( 
   Graphics graphics,
   RectangleF bounds
)

Parameters

graphics
Graphics object to render on the page.
bounds
System.Drawing.RectangleF coordinates to which to draw the page.
Example
private void arScale()
{    
    aPage = new GrapeCity.ActiveReports.Document.Page();    
    GrapeCity.ActiveReports.Interop.SystemPrinter m_myARPrinter = new GrapeCity.        
        ActiveReports.Interop.SystemPrinter();    
    m_myARPrinter.StartJob("Test Printer");    
    System.Drawing.RectangleF rec;    
    float xOffSet = m_myARPrinter.PhysicalOffsetX/m_myARPrinter.Graphics.DpiX;    
    float yOffSet = m_myARPrinter.PhysicalOffsetY/m_myARPrinter.Graphics.DpiY;    
    float adjustedWidth = (aPage.Width/3)-(xOffSet*2);    
    float xPos = 0;    
    int nCount = rpt.Document.Pages.Count;    
    m_myARPrinter.StartPage();    
    For(int i=0; i < nCount; i++)    
    {        
        aPage = rpt.Document.Pages[i];        
        m_myARPrinter.Graphics.PageUnit = System.Drawing.GraphicsUnit.Pixel;        
        rec = System.Drawing.RectangleF.FromLTRB(xOffSet+xPos, yOffSet,(xOffSet+xPos)+            
            adjustedWidth,yOffSet+adjustedWidth);        
        xPos = adjustedWidth + xPos;        
        aPage.Draw(m_myARPrinter.Graphics,rec);          
    }    
    m_myARPrinter.EndPage();    
    m_myARPrinter.EndJob();
}
Private Sub arScale()    
    m_myARPrinter.StartJob("Test Printer")    
    Dim aPage As New GrapeCity.ActiveReports.Document.Page()    
    Dim rec As New System.Drawing.RectangleF()    
    Dim xOffSet As Single    
    Dim yOffSet As Single    
    Dim adjustedWidth As Single    
    Dim xPos As Single        
    xOffSet = m_myARPrinter.PhysicalOffsetX / m_myARPrinter.Graphics.DpiX    
    yOffSet = m_myARPrinter.PhysicalOffsetY / m_myARPrinter.Graphics.DpiY    
    adjustedWidth = (aPage.Width / 3) - (xOffSet / 2)    
    xPos = 0    
    Dim nCount As Integer    
    nCount = rpt.Document.Pages.Count    
    m_myARPrinter.StartPage()    
    For i = 0 To nCount - 1        
        aPage = rpt.Document.Pages(i)        
        m_myARPrinter.Graphics.PageUnit = GraphicsUnit.Pixel        
        rec = System.Drawing.RectangleF.FromLTRB(xOffSet + xPos, yOffSet, (xOffSet + xPos) + _            
            adjustedWidth, yOffSet + adjustedWidth)        
        xPos = adjustedWidth + xPos        
        aPage.Draw(m_myARPrinter.Graphics, rec)    
    Next    
    m_myARPrinter.EndPage()    
    m_myARPrinter.EndJob()
End Sub
See Also

Reference

Page Class
Page Members
Overload List

 

 


Copyright © 2016 GrapeCity, inc. All rights reserved

Support Forum