最新版Barcode Professional SDK for .NET下載

• 打開Visual Studio并創(chuàng)建一個(gè)以CrystalReportBarcodeDataSet.命名的窗體表格應(yīng)用程序
• 添加一個(gè)DataSet項(xiàng)到這個(gè)項(xiàng)目并命名為Northwin

• 添加一個(gè)新的TableAdapter到DataSet

按照向?qū)е械牟襟E。首先，請(qǐng)創(chuàng)建一個(gè)Northwind數(shù)據(jù)庫(kù)樣本的連接然后點(diǎn)擊下一步。隨后，選擇"Use SQL statements"后點(diǎn)擊下一步。最后，請(qǐng)輸入下面的SQL語(yǔ)句：

SELECT ProductID,ProductName,UnitPrice FROM Products

點(diǎn)擊Finish關(guān)閉Wizard對(duì)話框

• 添加一個(gè)新的自定義列到剛剛創(chuàng)建的數(shù)據(jù)表并將其命名為Barcode,如下圖所示:

• 改變Barcode column的數(shù)據(jù)類型為System.Byte[] (Array of Byte).NOTE:System.Byte[]的數(shù)據(jù)類型不會(huì)被列出,這也是您必須手動(dòng)輸入的原因

• 保存Northwind.xsd文件
• 現(xiàn)在，在項(xiàng)目中添加一個(gè)新的水晶報(bào)表項(xiàng)并命名為CrystalReportBarcode.rpt

點(diǎn)擊上圖的Add按鈕，然后在“Crystal Report Gallery”對(duì)話框中選擇“Blank Report”

點(diǎn)擊上圖中的OK按鈕

• 啟動(dòng)Crystal Report→Database→DatabaseExpert

在Database Expert對(duì)話框中選擇Products DataTable，出現(xiàn)如下圖所示的"Selected Tables"列表

點(diǎn)擊OK按鈕，Products數(shù)據(jù)表在Field Explorer Window中將會(huì)轉(zhuǎn)變?yōu)榭捎茫缦聢D所示：

• 請(qǐng)將報(bào)表設(shè)計(jì)成如下圖所示的樣子

在我們的方案中最重要的域是Barcode.在報(bào)表中選擇Barcode項(xiàng)并點(diǎn)擊右側(cè)“Format Object”選擇按鈕打開“Format Editor”對(duì)話框，在打開的對(duì)話框中選擇“Can Grow”選項(xiàng)并點(diǎn)擊OK按鈕

• 保存報(bào)表
• 現(xiàn)在，在設(shè)計(jì)時(shí)創(chuàng)建/打開一個(gè)窗體表格并拖放一個(gè)CrystalReportViewer控制器在上面
• 從解決方案資源管理器添加一個(gè)關(guān)于Barcode Professional SDK for .NET的集合組件：Neodynamic.SDK.Barcode.dll
• 在Form_Load事件過程中寫下如下代碼

VB

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    'Filling Products DataTable from DB
    Dim ta As New NorthwindTableAdapters.ProductsTableAdapter()
    Dim dt As New Northwind.ProductsDataTable()
    ta.Fill(dt)

    'Create an instance of Barcode Professional
    Dim bcp As New Neodynamic.SDK.BarcodeProfessional()
    'Barcode settings
    bcp.Symbology = Neodynamic.SDK.Symbology.Code39
    bcp.Extended = true
    bcp.AddChecksum = false
    bcp.BarHeight = 0.4f

    'Append fictitious Company internal prefix
    Dim prodPrefix As String = "12345"

    Dim row As Northwind.ProductsRow    
    For Each row In dt.Rows
        'Set the value to encode
        bcp.Code = prodPrefix + row.ProductID.ToString()
        'Generate the barcode image and store it into the Barcode Column
        row.Barcode = bcp.GetBarcodeImage(System.Drawing.Imaging.ImageFormat.Png)
    Next

    'Create a report object
    'and set its data source with the DataSet
    Dim report As New CrystalReportBarcode()
    report.SetDataSource(CType(dt, DataTable))
     
    Me.CrystalReportViewer1.ReportSource = report
End Sub
		    	

C#

private void Form1_Load(object sender, EventArgs e)
{
    //Filling Products DataTable from DB
    NorthwindTableAdapters.ProductsTableAdapter ta = new NorthwindTableAdapters.ProductsTableAdapter();
    Northwind.ProductsDataTable dt = new Northwind.ProductsDataTable();
    ta.Fill(dt);

    //Create an instance of Barcode Professional
    Neodynamic.SDK.BarcodeProfessional bcp = new Neodynamic.SDK.BarcodeProfessional();
    //Barcode settings
    bcp.Symbology = Neodynamic.SDK.Symbology.Code39;
    bcp.Extended = true;
    bcp.AddChecksum = false;
    bcp.BarHeight = 0.4f;

    //Append fictitious Company internal prefix
    string prodPrefix = "12345";

    //Update DataTable with barcode image
    foreach (Northwind.ProductsRow row in dt.Rows)
    {
        //Set the value to encode
        bcp.Code = prodPrefix + row.ProductID.ToString();
        //Generate the barcode image and store it into the Barcode Column
        row.Barcode = bcp.GetBarcodeImage(System.Drawing.Imaging.ImageFormat.Png);
    }

    //Create a report object
    //and set its data source with the DataSet
    CrystalReportBarcode report = new CrystalReportBarcode();
    report.SetDataSource((DataTable)dt);
     
    this.crystalReportViewer1.ReportSource = report;
}
			    

• 最后，運(yùn)行您的程序，在報(bào)表上將會(huì)顯示條形碼圖像

CrystalReportViewer控制器允許您導(dǎo)出Acrobat PDF、Microsoft Excel XLS等其它常用的文檔格式。在所有情況下，條碼圖像都會(huì)得到保護(hù)。