Imports Leadtools
Imports Leadtools.Codecs
Imports Leadtools.Web.Controls
Public Function WebImageViewer_GetThumbnailImage(ByVal webThumbnailViewer As WebThumbnailViewer) As RasterImage
Dim image As RasterImage = Nothing
If (webThumbnailViewer.Count > 1) Then
Dim thumbInfo As ThumbnailInfo = webThumbnailViewer.GetThumbnailInfo(0)
Dim thumbImageUrl As String = thumbInfo.Url
If (Not thumbInfo.CacheFileName = String.Empty) Then
thumbImageUrl = thumbInfo.CacheFileName
End If
Dim codecs As RasterCodecs = New RasterCodecs()
Dim filePath As String = webThumbnailViewer.Page.MapPath(thumbImageUrl)
image = codecs.Load(filePath, 0, CodecsLoadByteOrder.BgrOrGray, thumbInfo.Page, thumbInfo.Page)
End If
Return image
End Function
using Leadtools;
using Leadtools.Codecs;
using Leadtools.Web.Controls;
public RasterImage WebThumbnailViewer_GetThumbnailImage(WebThumbnailViewer webThumbnailViewer)
{
RasterImage image = null;
if(webThumbnailViewer.Count > 1)
{
ThumbnailInfo thumbInfo = webThumbnailViewer.GetThumbnailInfo(0);
string thumbImageUrl = thumbInfo.Url;
if(thumbInfo.CacheFileName != string.Empty)
thumbImageUrl = thumbInfo.CacheFileName;
RasterCodecs codecs = new RasterCodecs();
string filePath = webThumbnailViewer.Page.MapPath(thumbImageUrl);
image = codecs.Load(filePath, 0, CodecsLoadByteOrder.BgrOrGray, thumbInfo.Page, thumbInfo.Page);
}
return image;
}