Available in the LEADTOOLS Imaging toolkit. |
LoadMarkers example for Visual Basic
'Add LEAD Main ActiveX Control into your form and call it
"LEAD1"
Dim Markers1 As LEADMarkers
Private Sub LoadMarkers_Click()
LEAD1.Load "c:\image1.jpg", 0, 0, 1
Set Markers1 = LEAD1.LoadMarkers("c:\image1.jpg",
0)
LEAD1.SetMarkers Markers1, 0
LEAD1.Save "c:\image2.jpg", FILE_EXIF_JPEG,
24, 2, 0
End Sub