ExportZones Example for Visual Basic
Private Sub Command12_Click()
Dim nRet As Integer
nRet = RasterDoc.ImportZones (0, "c:\\zone.zon")
If nRet = 0 Then
MsgBox "Imports the zone file into the specified page"
End If
'...
' work with zones...
'...
' exports page zone list to Zone file...
nRet = RasterDoc.ExportZones (0, "c:\\zone.zon")
If nRet = 0 Then
MsgBox ("Exports the zone list into a zone file")
End If
End Sub