Методы DataMatrix ActiveX

object.AboutBox()

Не возвращает значение.

object.ShowProperties()

Не возвращает значение.

object.SaveToImageFile(cx, cy, sFileName, [lRes,] [dm])

cx	Вещественное значение определяет ширину картинки штрихкода.
cy	Вещественное значение определяет высоту картинки штрихкода.
sFileName	Строка определяет имя файла.
lRes	Необязательное (по умолчанию 0). Определяет разрешение картинки.
dm	Необязательное (по умолчанию dmPixels). Определяет единицы измерения, которые используются для задания cx и cy. См. Примечание.

Не возвращает значение.

Формат, в котором будет сохранен файл зависит от расширения имени файла. Например, если задать sFileName как "img1.jpg", то штрихкод будет сохранен в JPEG.
Допускаются такие расширения - "wmf", "emf", "bmp", "jpg", "jpeg", "gif", "tiff", "png".

Параметр dm parameter может иметь следующие значения:
dmMils = 0, mils(0.001 inches)
dmInches = 1, inches
dmMM = 2, millimeters
dmPixels = 3, pixels

Если размер изображения (cx, cy) задается не в пикселах, его реальный размер будет вычисляться использую разрешение картинки - lRes.

Внимание! Для нормальной работы этой функции необходимо наличие библиотеки GDI+ (gdiplus.dll) на вашем PC, эта библиотека поставляется в составе Windows XP и выше. Если у вас нет такой библиотеки, то вы можете загрузить ее здесь, а затем скопировать ее в папку ../Windows/System32/.

'1.
'Сохранить изображение DataMatrix штрихкода в JPEG формат. Размер изображения будет 100x100 точек, разрешение 96 dpi.
Call DataMatrixCtrl1.SaveToImageFile(100, 100, "c:\datamatrix.gif")

'2.
'Сохранить изображение DataMatrix штрихкода в JPEG формат. Размер изображения будет 30x30 мм, разрешение 300 dpi.
Call DataMatrixCtrl1.SaveToImageFile(30, 30, "c:\datamatrix.gif", 300, dmMM)

object.PartialWritePicture(sFileName, x, y, width, height)

sFileName	Строка определяющая имя файла.
x	Целое определяющее X координату штрихкода.
y	Целое определяющее Y координату штрихкода.
width	Целое определяющее ширину штрихкода.
height	Целое определяющее высоту штрихкода.

Не возвращает значение.

Image файл определяемый параметром sFileName может быть следующих форматов "bmp", "jpg", "jpeg", "gif", "tiff" и "png".

Call DataMatrix.PartialWritePicture("c:\1.jpg", 10, 10, 60, 60)

Используя этот метод, можно добавить к любому вашему image файлу штрихкод, который может использоваться для идентификации файла или для иных целей.

object.CopyToClipboard(cx, cy)

cx	Целое значение определяющее ширину штрихкода
cy	Целое значение определяющее высоту штрихкода

Не возвращает значение.

object.DrawMatrixToSize(X, Y, CX, CY, dm, [hDC])

Параметры

X	Вещественное значение определяющее X координату штрихкода.
Y	Вещественное значение определяющее Y координату штрихкода.
CX	Вещественное значение определяющее ширину шрихкода.
CY	Вещественное значение определяющее высоту шрихкода.
dm	Необязательное (по умолчанию dmPixels). Определяет единицы измерения cx и cy. См. здесь.
hDC	Необязательное (по умолчанию 0). Хэндл контекста устройства, который будет использовать для рисования. Если этот параметр не определен или равен нулю, то будет использоваться хэндл принтера.

Возвращаемое значение

Не возвращает значение.

'Нарисовать DataMatrix на экран.
Call DataMatrixCtrl1.DrawMatrixToSize(0, 0, 200, 200, dmPixels, Form1.hDC)


'Напечатать DataMatrix штрихкод
Открыть текущий принтер
Call DataMatrixCtrl1.BeginPrint("")

'напечатать DataMatrix в X=10 mm, Y=10 mm, ШИРИНА=25 mm, ВЫСОТА=25 mm
Call DataMatrixCtrl1.DrawMatrixToSize(10, 10, 25, 25, dmMM)

Call DataMatrixCtrl1.EndPrint

object.BeginPrint(sPrinterName)

sPrinterName

Строка определяющая имя принтера. Имя принтера можно увидеть в папке Принтеры Панели Управления. Если имя пустое, будет открыт принтер по умолчанию.

Не возвращает значение.

Эта функция должна быть вызвана первой, до начала использования других функций печати.

object.EndPrint()

Не возвращает значение.

object.NewPage()

Не возвращает значение.

object.EndPage()

Не возвращает значение.

object.GetPrinterHDC()

HDC

object.SetPrinterHDC(hDC)

hDC	Значение определяющее хэндл принтера.

Не возвращает значение.

Printer.CurrentX = 2048
Printer.Print "SBarCode.com, VB Example"

'DataMatrix-ActiveX будет использовать объект принтера Visual Basic
Call DataMatrixCtrl1.SetPrinterHDC(Printer.hDC)

'напечатать DataMatrix штрихкоды
Call DataMatrixCtrl1.DrawMatrixToSize(10, 10, 30, 30, dmMM)
Call DataMatrixCtrl1.DrawMatrixToSize(70, 10, 30, 30, dmMM)

Printer.EndDoc

object.BinaryWritePicture(sFmt, CX, CY)

Параметры

sFmt	Строка определяющяя расширение имени файла. Могут использоваться следующие расширения - "wmf", "emf", "bmp", "jpg", "jpeg", "gif", "tiff" and "png".
CX	Целое определяющее ширину штрихкода
CY	Целое определяющее высоту штрихкода

Возвращаемое значение

Variant определяющее safe array байт.

Этот метод может быть очень удобным для пересылки изображения штрихкода через Интернет. Например, он может использоваться на IIS сервере.

Внимание! Для нормальной работы этой функции необходимо наличие библиотеки GDI+ (gdiplus.dll) на вашем PC, эта библиотека поставляется в составе Windows XP и выше. Если у вас нет такой библиотеки, то вы можете загрузить ее здесь, а затем скопировать ее в папку ../Windows/System32/.

Здесь приведен пример ASP страницы поставляемой вместе с нашим DataMatrix-ActiveX.

<%
' datamatrix.asp
' (c) 1999-2005 www.SBarCode.com

'отправить картинку в GIF формате
Response.ContentType = "image/gif"
Response.BinaryWrite Barcode.BinaryWritePicture("gif", 200, 200)

SET Barcode=nothing
%>
			

Этот метод требует Server лицензии.

object.GetMatrixSize(module, xRes, yRes, dmIn, dmOut, width, height)

module	Вещественное значение определяющее модуль PDF417.
xRes	Целое определяющее разрешение (в dpi) вдоль оси X.
yRes	Целое определяющее разрешение (в dpi) вдоль оси Y.
dmIn	Это значение определяет единицы, в которых задан module.
dmOut	Это значение определяет единицы, в которых будут выданы width, height.
width	Переменная, которая получает ширину DataMatrix .
height	Переменная, которая получает высоту DataMatrix .

Напечатать DataMatrix с модулем 40 Mils. Штрихкод будет начинаться с X=10 mm, Y=10 mm

'открыть текущий принтер
Call DataMatrixCtrl1.BeginPrint("")

'получить разрешение принтера (в dpi)
Dim dpiX As Long, dpiY As Long
dpiX = GetDeviceCaps(Printer.hdc, LOGPIXELSX)
dpiY = GetDeviceCaps(Printer.hdc, LOGPIXELSY)

'получить необходимые размеры DataMatrix штрихкода в единицах определяемых параметром dmOut
Dim Width, Height
Call DataMatrixCtrl1.GetMatrixSize(40, dpiX, dpiY, dmMils, dmMM, Width, Height)

'напечатать DataMatrix
Call DataMatrixCtrl1.DrawMatrixToSize(10, 10, Width, Height, dmMM)

'закрыть принтер
Call DataMatrixCtrl1.EndPrint

Сохранить DataMatrix в файл с модулем равным 4 пиксела.

'если dmIn и dmOut определяются в пикселах, вам не нужно задавать разрешение (xRes, yRes), но оно не может быть равно 0.
Dim Width, Height
Call DataMatrixCtrl1.GetMatrixSize(4, 1, 1, dmPixels, dmPixels, Width, Height)

Call DataMatrixCtrl1.SaveToImageFile(Width, Height, "c:\datamatrix.bmp")

object.FreezeEncode(bFreeze)

bFreeze

Boolean которое определяет кодировать или нет DataMatrix.

Не возвращает значение.

DataMatrixCtrl1.FreezeEncode (True)
DataMatrixCtrl1.DataToEncode = "1234567"
DataMatrixCtrl1.EncodingMode = eC40
DataMatrixCtrl1.PreferredFormat = f64x64
DataMatrixCtrl1.FreezeEncode (False)