¿Cómo puedo crear un 2D Mailmark⁠™ Type 7?

¿Cómo puedo crear un 2D Mailmark⁠™ Type 7?

El siguiente código de ejemplo en VB .NET muestra cómo ajustar la configuración para el archivo de mapa de bits 2D Mailmark Type 7:

' 2D Mailmark Type 7 - 24x24 matrix size
' Module size 0.508 mm (300 dpi), total size 12.2 x 12.2 mm

Dim myBarcode As New TECIT.TBarCode.Barcode
myBarcode.BarcodeType = TECIT.TBarCode.BarcodeType.Mailmark_2D
myBarcode.DataMatrix.Size = TECIT.TBarCode.DataMatrixSize.Square24x24

myBarcode.SizeMode = TECIT.TBarCode.SizeMode.CustomModuleWidth
myBarcode.ModuleWidth = 0.508F
myBarcode.Dpi = 300

myBarcode.Data = "JGB 012100123412345678AB19XY1A 0             123456"

' retrieve final size in [mm]
Dim finalSizeMM As SizeF
finalSizeMM = myBarcode.CalculateBarcodeSize(Nothing) ' will return [mm]

Dim widthPx As Integer
Dim heightPx As Integer

' convert to Pixel
widthPx = finalSizeMM.Width * myBarcode.Dpi / 25.4
heightPx = finalSizeMM.Height * myBarcode.Dpi / 25.4

' adjust bitmap size and save as BMP
myBarcode.BoundingRectangleF = New RectangleF(0, 0, widthPx, heightPx)
myBarcode.Draw("C:\temp\2DMailmark.bmp", TECIT.TBarCode.ImageType.Bmp)