WriteMetaData example for Visual Basic
Dim Marker1 As LEADMarkers
Dim RasterIO As LEADRasterIO
Private Sub WriteMetaData _Click()
Marker1.Load "c:\image1.jpg", 0
RasterIO.SetMarkers Marker1,0
RasterIO.WriteMetaData "c:\image2.tif", METADATA_ALL
End Sub