Parameters
- ImageFrom
This method generates an error if object.Image.IsZone is true.
Copies all properties and image pixels from ImageFrom to this image.
void ImageMethods() { CiServer ci = Inlite.ClearImageNet.Server.GetThreadServer(); CiImage image = ci.CreateImage(); // Initialize 3000 pixels by 2000 pixels RGB image. All pixels of new RGB image are black. Default resolution is 1 dpi image.CreateBpp(3000, 2000, 24); // Change 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((int)(8.5 * 300), (int)(11.0 * 300)); // Convert to grayscale image.ToGrayscale(); // Create zone in the center of the image CiImage 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 CiRect rect = ci.CreateRect(0, 0, image.Width / 2, image.Height / 2); CiImage zoneCorner = image.CreateZoneRect(rect); // Clear corner area on the image zoneCorner.Clear(); // Duplicate center area to a new image CiImage imageCenter = zoneCenter.Duplicate(); // Copy from the original image CiImage imageCopy = ci.CreateImage(); imageCopy.Copy(image); // Convert image to bi-tonal imageCopy.ToBitonal(); // Clean-up. Free image memory image.Close(); imageCenter.Close(); imageCopy.Close(); }
Sub ImageMethods() Dim ci As CiServer = Inlite.ClearImageNet.Server.GetThreadServer() Dim image As CiImage = ci.CreateImage() ' Initialize 3000 pixels by 2000 pixels RGB image. All pixels of new RGB image are black. Default resolution is 1 dpi image.CreateBpp(3000, 2000, 24) ' Change 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 = 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 = ci.CreateRect(0, 0, image.Width / 2, image.Height / 2) Dim zoneCorner As CiImage = image.CreateZoneRect(rect) ' Clear corner area on the image zoneCorner.Clear() ' Duplicate center area to a new image Dim imageCenter As CiImage = zoneCenter.Duplicate() ' Copy from the original image Dim imageCopy As CiImage = 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