GenerateThumb Example VB

This example demonstrates how to regenerate a thumbnail after the source page has been modified. In this case, the page is rotated left.

Private Sub cmdGenerateThumb_Click()
    Dim iPage As Integer    
    On Error GoTo Gen_Error    
    iPage = 1    
    ImgEdit1.Image = ImgThumbnail1.Image
    ImgEdit1.Display    
    'Rotate page 1 left 90 degrees
    ImgEdit1.Page = iPage
    ImgEdit1.RotateLeft
    ImgThumbnail1.GenerateThumb 1, iPage 'Regenerate corresponding thumb
    Exit Sub
Gen_Error:
    MsgBox (Err.Description)
End Sub