BinaryKits.Zpl.Viewer (開発者向けの仕組み)

using BinaryKits.Zpl.Viewer;
using System.IO;
using IronPdf;
using System.Linq;

class Program
{
    static void Main()
    {
        // Initialize printer storage for ZPL elements
        IPrinterStorage printerStorage = new PrinterStorage();

        // Create an instance of ZplElementDrawer using the printer storage
        var drawer = new ZplElementDrawer(printerStorage);

        // Initialize ZPL analyzer and analyze ZPL code
        var analyzer = new ZplAnalyzer(printerStorage);
        var analyzeInfo = analyzer.Analyze("^XA ^MMT ^PW812 ^LL0203 ^LS0^FO0,0^A0N,36,36^FB600,1,0,L,0^FD^FS ^FO53.592,23.142^PW0^LL0^A0N,36,36^FB620,10,0,C,0^FDTest will go here^FS^FO8.932,6.09^GB798.196,1205.82,3,B^FS^FO190.008,247.254^BQN,^PW0^LL02,10,Q,7^FDQA,False^FS^XZ");

        // Iterate through label information and draw ZPL elements
        foreach (var labelInfo in analyzeInfo.LabelInfos)
        {
            // Draw the ZPL elements into an image
            var imageData = drawer.Draw(labelInfo.ZplElements);

            // Write the image data to a PNG file
            File.WriteAllBytes("label.png", imageData);
        }

        // Retrieve image files and convert them to a single PDF
        var imageFiles = Directory.EnumerateFiles("").Where(f => f.EndsWith("label.png"));
        ImageToPdfConverter.ImageToPdf(imageFiles).SaveAs("zpl.pdf");
    }
}

Imports BinaryKits.Zpl.Viewer
Imports System.IO
Imports IronPdf
Imports System.Linq

Friend Class Program
	Shared Sub Main()
		' Initialize printer storage for ZPL elements
		Dim printerStorage As IPrinterStorage = New PrinterStorage()

		' Create an instance of ZplElementDrawer using the printer storage
		Dim drawer = New ZplElementDrawer(printerStorage)

		' Initialize ZPL analyzer and analyze ZPL code
		Dim analyzer = New ZplAnalyzer(printerStorage)
		Dim analyzeInfo = analyzer.Analyze("^XA ^MMT ^PW812 ^LL0203 ^LS0^FO0,0^A0N,36,36^FB600,1,0,L,0^FD^FS ^FO53.592,23.142^PW0^LL0^A0N,36,36^FB620,10,0,C,0^FDTest will go here^FS^FO8.932,6.09^GB798.196,1205.82,3,B^FS^FO190.008,247.254^BQN,^PW0^LL02,10,Q,7^FDQA,False^FS^XZ")

		' Iterate through label information and draw ZPL elements
		For Each labelInfo In analyzeInfo.LabelInfos
			' Draw the ZPL elements into an image
			Dim imageData = drawer.Draw(labelInfo.ZplElements)

			' Write the image data to a PNG file
			File.WriteAllBytes("label.png", imageData)
		Next labelInfo

		' Retrieve image files and convert them to a single PDF
		Dim imageFiles = Directory.EnumerateFiles("").Where(Function(f) f.EndsWith("label.png"))
		ImageToPdfConverter.ImageToPdf(imageFiles).SaveAs("zpl.pdf")
	End Sub
End Class