←Select platform

MICRCodeDetectionCommand Class

Summary
Automatically detects a Magnetic Ink Character Recognition (MICR) zone in a document image.
Syntax
C#
VB
Objective-C
C++
Java
public class MICRCodeDetectionCommand : RasterCommand 
Public Class MICRCodeDetectionCommand  
   Inherits RasterCommand 
@interface LTMICRCodeDetectionCommand : LTRasterCommand 
public class MICRCodeDetectionCommand extends RasterCommand 
public ref class MICRCodeDetectionCommand : public RasterCommand   
Remarks
  • This command searches inside a given LeadRect zone (set using the SearchingZone property) and detects a MICR code.
  • Get the detected zone by calling the MICRZone property.
Example
C#
VB
using Leadtools; 
using Leadtools.Codecs; 
using Leadtools.ImageProcessing; 
using Leadtools.ImageProcessing.Core; 
 
public void MICRCodeDetectionCommandExample() 
{ 
   // Load an image 
   RasterCodecs codecs = new RasterCodecs(); 
   codecs.ThrowExceptionsOnInvalidImages = true; 
 
   RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "MICR_SAMPLE.tif")); 
   string destFileName = Path.Combine(LEAD_VARS.ImagesDir, "MICRCode.bmp"); 
 
   // Prepare the command 
   MICRCodeDetectionCommand command = new MICRCodeDetectionCommand(); 
 
   command.SearchingZone = new LeadRect(0, 0, image.Width, image.Height); 
 
   command.Run(image); 
 
   CopyRectangleCommand copyCommand = new CopyRectangleCommand(); 
   copyCommand.Rectangle = new LeadRect(command.MICRZone.Left, 
                                        command.MICRZone.Top, 
                                        command.MICRZone.Width, 
                                        command.MICRZone.Height); 
   copyCommand.Run(image); 
 
   RasterImage destImage = copyCommand.DestinationImage; 
   if (destImage != null) 
   { 
      // Save it to disk 
      codecs.Save(destImage, destFileName, RasterImageFormat.Bmp, 24); 
   } 
 
   //Save OCRA zones 
   for (int i = 0; i < command.OCRAZones.Length; i++) 
   { 
      copyCommand.Rectangle = new LeadRect(command.OCRAZones[i].Left, 
                                           command.OCRAZones[i].Top, 
                                           command.OCRAZones[i].Width, 
                                           command.OCRAZones[i].Height); 
 
      copyCommand.Run(image); 
 
      destImage = copyCommand.DestinationImage; 
      if (destImage != null) 
      { 
         // Save OCRA to disk 
         destFileName = Path.Combine(LEAD_VARS.ImagesDir, i + "_OCRA.bmp"); 
         codecs.Save(destImage, destFileName, RasterImageFormat.Bmp, 24); 
      } 
   } 
} 
 
static class LEAD_VARS 
{ 
   public const string ImagesDir = @"C:\LEADTOOLS21\Resources\Images"; 
} 
Imports Leadtools 
Imports Leadtools.Codecs 
Imports Leadtools.ImageProcessing 
Imports Leadtools.ImageProcessing.Core 
 
Public Sub MICRCodeDetectionCommandExample() 
   ' Load an image 
   Dim codecs As RasterCodecs = New RasterCodecs() 
   codecs.ThrowExceptionsOnInvalidImages = True 
 
   Dim image As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "MICR_SAMPLE.tif")) 
   Dim destFileName As String = Path.Combine(LEAD_VARS.ImagesDir, "MICRCode.bmp") 
 
   ' Prepare the command 
   Dim command As MICRCodeDetectionCommand = New MICRCodeDetectionCommand() 
   command.SearchingZone = New LeadRect(0, 0, image.Width, image.Height) 
   command.Run(image) 
 
   Dim copyCommand As CopyRectangleCommand = New CopyRectangleCommand() 
   copyCommand.Rectangle = New LeadRect(command.MICRZone.Left, command.MICRZone.Top, command.MICRZone.Width, command.MICRZone.Height) 
   copyCommand.Run(image) 
 
   Dim destImage As RasterImage = copyCommand.DestinationImage 
   If Not destImage Is Nothing Then 
      ' Save it to disk 
      codecs.Save(destImage, destFileName, RasterImageFormat.Bmp, 24) 
   End If 
 
   'Save OCRA zones 
   Dim i As Integer = 0 
   Do While i < command.OCRAZones.Length 
      copyCommand.Rectangle = New LeadRect(command.OCRAZones(i).Left, command.OCRAZones(i).Top, command.OCRAZones(i).Width, command.OCRAZones(i).Height) 
 
      copyCommand.Run(image) 
 
      destImage = copyCommand.DestinationImage 
      If Not destImage Is Nothing Then 
         ' Save OCRA to disk 
         destFileName = Path.Combine(LEAD_VARS.ImagesDir, i & "_OCRA.bmp") 
         codecs.Save(destImage, destFileName, RasterImageFormat.Bmp, 24) 
      End If 
      i += 1 
   Loop 
End Sub 
 
Public NotInheritable Class LEAD_VARS 
   Public Const ImagesDir As String = "C:\LEADTOOLS21\Resources\Images" 
End Class 
Requirements

Target Platforms

Help Version 21.0.2021.7.2
Products | Support | Contact Us | Intellectual Property Notices
© 1991-2021 LEAD Technologies, Inc. All Rights Reserved.

Leadtools.ImageProcessing.Core Assembly
Products | Support | Contact Us | Intellectual Property Notices
© 1991-2021 LEAD Technologies, Inc. All Rights Reserved.