xtrareports-11919-feature-guide-to-devexpress-reports-use-report-controls-use-bar-codes-code-93.md
Code 93 is an alphanumeric, variable length symbology. It was designed to supplement and improve the Code 39 barcode.
Refer to the following article for more details: Code 93.
Drag the XRBarCode item from the DX.25.2: Report Controls tab and drop it onto the report.
Set the XRBarCode control’s Symbology property to Code 93 (an object of the Code93Generator type).
Specify common barcode properties and properties specific to Code 93.
Use the barcode’s CalcCheckSum property to specify whether to calculate a check sum for this barcode.
Note
A checksum of a Code 93 barcode can contain characters that are not supported by this barcode symbology. For this reason, the checksum is not included in the Code 93 barcode’s displayed text.
The following code creates a Code 93 barcode and specifies its properties.
View Example: How to add a bar code to a report
using System;
using System.Collections.Generic;
using System.Drawing.Printing;
using System.Windows.Forms;
using DevExpress.XtraPrinting.BarCode;
using DevExpress.XtraReports.UI;
// ...
public XRBarCode CreateCode93BarCode(string BarCodeText) {
// Create a barcode control.
XRBarCode barCode = new XRBarCode();
// Set the barcode's type to Code 93.
barCode.Symbology = new Code93Generator();
// Adjust the barcode's main properties.
barCode.Text = BarCodeText;
barCode.Width = 400;
barCode.Height = 100;
// Adjust the properties specific to the barcode type.
((Code93Generator)barCode.Symbology).CalcCheckSum = false;
return barCode;
}
Imports System
Imports System.Collections.Generic
Imports System.Drawing.Printing
Imports System.Windows.Forms
Imports DevExpress.XtraPrinting.BarCode
Imports DevExpress.XtraReports.UI
' ...
Public Function CreateCode93BarCode(ByVal BarCodeText As String) As XRBarCode
' Create a barcode control.
Dim barCode As New XRBarCode()
' Set the barcode's type to Code 93.
barCode.Symbology = New Code93Generator()
' Adjust the barcode's main properties.
barCode.Text = BarCodeText
barCode.Width = 400
barCode.Height = 100
' Adjust the properties specific to the barcode type.
CType(barCode.Symbology, Code93Generator).CalcCheckSum = False
Return barCode
End Function
The code example below shows how to create a report with the Code 93 barcode:
using DevExpress.XtraPrinting.BarCode;
using DevExpress.XtraReports.UI;
//...
var barCode = CreateCode93BarCode("012345678");
var report = new XtraReport() {
Bands = {
new DetailBand() {
Controls = { barCode }
}
}
};
Imports DevExpress.XtraPrinting.BarCode
Imports DevExpress.XtraReports.UI
'...
Private barCode = CreateCode93BarCode("012345678")
Dim report As New XtraReport()
Dim band = New DetailBand()
band.Controls.Add(barCode)