ClearImage COM API
Close Method
CiImage Object : Close Method
Description
Close image
Syntax
Visual Basic
Public Sub Close() 
Remarks
This method frees memory buffer associated with this image. It sets IsValid property to false. All the following operations requiring a valid image will generate an error.
Example
Sub ImageMethods()
  Dim Ci As New CiServer
  Dim image As CiImage: Set image = Ci.CreateImage
    '  Initialize 3000 pixels * 2000 pixels RGB image. All pixels of new RGB image are black.  Default resolution is 1 dpi
  image.CreateBpp 3000, 2000, 24
    '  Set DPI to 200
  image.HorzDpi = 200: image.VertDpi = 200
    '  Crop area of the image
  image.Crop 100, 200, 800, 1000
    '  Initialize 8.5" by 11" bi-tonal image. All pixels of new Bi-tonal image are white.  Default resolution is 300 dpi
    '  Image initialization closes and frees memory of the previously crated RGB image
  image.Create 8.5 * 300, 11 * 300
    '  Convert to grayscale
  image.ToGrayscale
    '  Create zone in the center of the image
  Dim zoneCenter As CiImage
  Set zoneCenter = image.CreateZone(image.Width / 3, image.Height / 3, _
                image.Width * 2 / 3, image.Height * 2 / 3)
    '  Invert center area of the image
  zoneCenter.Invert
    '  Re-define zone to upper left quadrant of the image
  Dim rect As CiRect: Set rect = Ci.CreateRect
  rect.Left = 0: rect.Right = image.Width / 2
  rect.Top = 0: rect.bottom = image.Height / 2
  Dim zoneCorner As CiImage
  Set zoneCorner = image.CreateZoneRect(rect)
    '  Clear corner area on the image
  zoneCorner.Clear
    '  Duplicate center area to a new image
  Dim imageCenter As CiImage
  Set imageCenter = zoneCenter.Duplicate
    '  Copy from the original image
  Dim imageCopy As CiImage: Set imageCopy = Ci.CreateImage
  imageCopy.Copy image
    '  Convert image to bi-tonal
  imageCopy.ToBitonal
    '  Clean-up. Free image memory
  image.Close
  imageCenter.Close
  imageCopy.Close
End Sub
See Also

CiImage Object  | CiImage Members