←Select platform

GetDefaultPicture Method

Summary

Gets the default picture for an AnnRubberStampObject type.

Syntax

C#
VB
C++
public static AnnPicture GetDefaultPicture( 
   AnnRubberStampType type 
) 
  
Public Shared Function GetDefaultPicture( _ 
   ByVal type As Leadtools.Windows.Annotations.AnnRubberStampType _ 
) As Leadtools.Windows.Annotations.AnnPicture 

Parameters

type
An AnnRubberStampType value that represents the type of the rubber stamp.

Return Value

An AnnPicture class that defines the picture for the AnnRubberStampType specified by type.

Remarks

Use the SetDefaultPicture method to change the default picture used by the AnnRubberStampObject objects. Use the GetUseOriginalPicture and SetUseOriginalPicture methods to control whether an AnnRubberStampObject will use the default or original picture for a certain type.

Example

This sample does the following:

  1. displays the default rubberstamp picture and displays it
  2. restores original rubberstamp picture and displays
  3. changes to new style and displays
    C#
    VB
    Silverlight C#
    Silverlight VB
    using Leadtools.Windows.Controls; 
    using Leadtools.Windows.Annotations; 
    using Leadtools.Demos; 
    using Leadtools.Help; 
     
    public void AnnRubberStampObject_GetDefaultPicture(DrawingContext dc, string filenameNewPicture) 
    { 
       AnnRubberStampType type = AnnRubberStampType.Important; 
       // first draw the original picture for the Important rubber stamp 
       Rect rc = new Rect(0, 0, 240, 120); 
       DrawRubberStampPicture(dc, rc, type); 
     
       // now change the picture to one of our own and redraw it 
       BitmapSource img = new BitmapImage(new Uri(filenameNewPicture)); 
       AnnPicture picture = new AnnPicture(img); 
       picture.TransparentMode = AnnTransparentMode.None; 
       AnnRubberStampObject.SetDefaultPicture(type, picture); 
     
       // at this point, all new AnnRubberStampObject with Type = Important will use this new picture 
       rc.Offset(0, rc.Height + 10); 
       DrawRubberStampPicture(dc, rc, type); 
     
       // finally, set the picture back to the original value and redraw it 
       AnnRubberStampObject.SetUseOriginalPicture(type, true); 
       rc.Offset(0, rc.Height + 10); 
       DrawRubberStampPicture(dc, rc, type); 
    } 
     
    private void DrawRubberStampPicture(DrawingContext dc, Rect rc, AnnRubberStampType type) 
    { 
       // get the default picture for the rubber stamp 
       AnnPicture pic = AnnRubberStampObject.GetDefaultPicture(type); 
     
       // draw it 
       if (pic.Image != null) 
       { 
          dc.DrawImage(pic.Image, rc); 
       } 
    } 
    Imports Leadtools.Windows.Controls 
    Imports Leadtools.Windows.Annotations 
     
    Public Sub AnnRubberStampObject_GetDefaultPicture(ByVal dc As DrawingContext, ByVal filenameNewPicture As String) 
       Dim type As AnnRubberStampType = AnnRubberStampType.Important 
       ' first draw the original picture for the Important rubber stamp 
       Dim rc As Rect = New Rect(0, 0, 240, 120) 
       DrawRubberStampPicture(dc, rc, type) 
     
       ' now change the picture to one of our own and redraw it 
       Dim img As BitmapSource = New BitmapImage(New Uri(filenameNewPicture)) 
       Dim picture As AnnPicture = New AnnPicture(img) 
       picture.TransparentMode = AnnTransparentMode.None 
       AnnRubberStampObject.SetDefaultPicture(type, picture) 
     
       ' at this point, all new AnnRubberStampObject with Type = Important will use this new picture 
       rc.Offset(0, rc.Height + 10) 
       DrawRubberStampPicture(dc, rc, type) 
     
       ' finally, set the picture back to the original value and redraw it 
       AnnRubberStampObject.SetUseOriginalPicture(type, True) 
       rc.Offset(0, rc.Height + 10) 
       DrawRubberStampPicture(dc, rc, type) 
    End Sub 
     
    Private Sub DrawRubberStampPicture(ByVal dc As DrawingContext, ByVal rc As Rect, ByVal type As AnnRubberStampType) 
       ' get the default picture for the rubber stamp 
       Dim pic As AnnPicture = AnnRubberStampObject.GetDefaultPicture(type) 
     
       ' draw it 
       If Not pic.Image Is Nothing Then 
          dc.DrawImage(pic.Image, rc) 
       End If 
    End Sub 
    using Leadtools.Windows.Controls; 
    using Leadtools.Windows.Annotations; 
    using Leadtools.Examples; 
    //using Leadtools.Help; 
     
    public void AnnRubberStampObject_GetDefaultPicture(WriteableBitmap wb, string filenameNewPicture) 
    { 
       AnnRubberStampType type = AnnRubberStampType.Important; 
       // first draw the original picture for the Important rubber stamp 
       Rect rc = new Rect(0, 0, 240, 120); 
       DrawRubberStampPicture(ref wb, rc, type); 
     
       // now change the picture to one of our own and redraw it 
       BitmapSource img = new BitmapImage(new Uri(filenameNewPicture)); 
       AnnPicture picture = new AnnPicture(img); 
       picture.TransparentMode = AnnTransparentMode.None; 
       AnnRubberStampObject.SetDefaultPicture(type, picture); 
     
       // at this point, all new AnnRubberStampObject with Type = Important will use this new picture 
       rc.Y += rc.Height + 10; 
       DrawRubberStampPicture(ref wb, rc, type); 
     
       // finally, set the picture back to the original value and redraw it 
       AnnRubberStampObject.SetUseOriginalPicture(type, true); 
       rc.Y += rc.Height + 10; 
       DrawRubberStampPicture(ref wb, rc, type); 
    } 
     
    private void DrawRubberStampPicture(ref WriteableBitmap wb, Rect rc, AnnRubberStampType type) 
    { 
       // get the default picture for the rubber stamp 
       AnnPicture pic = AnnRubberStampObject.GetDefaultPicture(type); 
     
       // draw it 
       if (pic.Image != null) 
       { 
          Canvas cvs = new Canvas(); 
          cvs.RenderTransformOrigin = new Point(rc.X, rc.Y); 
          cvs.Width = rc.Width; 
          cvs.Height = rc.Height; 
     
          wb = new WriteableBitmap(pic.Image); 
          wb.Render(cvs, null); 
       } 
    } 
    Imports Leadtools.Windows.Controls 
    Imports Leadtools.Windows.Annotations 
     
    Public Sub AnnRubberStampObject_GetDefaultPicture(ByVal wb As WriteableBitmap, ByVal filenameNewPicture As String) 
       Dim type As AnnRubberStampType = AnnRubberStampType.Important 
       ' first draw the original picture for the Important rubber stamp 
       Dim rc As Rect = New Rect(0, 0, 240, 120) 
       DrawRubberStampPicture(wb, rc, type) 
     
       ' now change the picture to one of our own and redraw it 
       Dim img As BitmapSource = New BitmapImage(New Uri(filenameNewPicture)) 
       Dim picture As AnnPicture = New AnnPicture(img) 
       picture.TransparentMode = AnnTransparentMode.None 
       AnnRubberStampObject.SetDefaultPicture(type, picture) 
     
       ' at this point, all new AnnRubberStampObject with Type = Important will use this new picture 
       rc.Y += rc.Height + 10 
       DrawRubberStampPicture(wb, rc, type) 
     
       ' finally, set the picture back to the original value and redraw it 
       AnnRubberStampObject.SetUseOriginalPicture(type, True) 
       rc.Y += rc.Height + 10 
       DrawRubberStampPicture(wb, rc, type) 
    End Sub 
     
    Private Sub DrawRubberStampPicture(ByRef wb As WriteableBitmap, ByVal rc As Rect, ByVal type As AnnRubberStampType) 
       ' get the default picture for the rubber stamp 
       Dim pic As AnnPicture = AnnRubberStampObject.GetDefaultPicture(type) 
     
       ' draw it 
       If Not pic.Image Is Nothing Then 
          Dim cvs As Canvas = New Canvas() 
          cvs.RenderTransformOrigin = New Point(rc.X, rc.Y) 
          cvs.Width = rc.Width 
          cvs.Height = rc.Height 
     
          wb = New WriteableBitmap(pic.Image) 
          wb.Render(cvs, Nothing) 
       End If 
    End Sub 
Requirements

Target Platforms

Help Version 19.0.2017.10.27
Products | Support | Contact Us | Copyright Notices
© 1991-2017 LEAD Technologies, Inc. All Rights Reserved.

Leadtools.Windows.Annotations Assembly