Loïc$2006306 Loïc 05/19/2007 :: 16:46
Registered
| | You can do that with a gdpicture object and using the zoom changed event of the gdviewer.
In vb6:
Private Sub oGdViewer_ZoomChanged() Dim oGdPicture As New GdpicturePro.cGdPicture Dim nImageID As Long nImageID = oGdPicture.CreateImageFromFile("foreground.jpg") Call oGdPicture.DisplayImageOnHDC(oGdViewer.hDC, 1, 1, 100, 100) oGdPicture.CloseImage (nImageID) Set oGdPicture = Nothing End Sub
Best regards,
Loïc Carrère | |