Viewing pictures in a viewer control designed for scrolling, zooming, panning
Place a new THBView control on your form.
Use THBImageEdit to load your picture. Then plug THBImageEdit into the THBView viewer control.
The THBImageEdit object supports the THBViewLayer interface. It is designed to plug the object as a new layer into THBView.
Dim spie As THBImageEdit
Set spie = ImageFactory.CreateTHBImageEdit
spie.LoadPictureFromFile "C:\THBLogo.gif", thbifAutoDetect
Dim spvl As THBViewLayer
Set spvl = spie.InterfaceITHBViewLayer
spvl.Name = "Raster Image Layer"
spTHBView.Layers.ClearAndAdd spvl
In this way you can add multiple raster or vector layers and view them using THBView.



RSS News Feed