NuGetパッケージを使用して C# で QR コードを生成する方法

using IronQr;

// Set license key before any IronQR operation
IronQr.License.LicenseKey = "YOUR-LICENSE-KEY-HERE";

Imports IronQr

' Set license key before any IronQR operation
IronQr.License.LicenseKey = "YOUR-LICENSE-KEY-HERE"

using IronQr;
using IronSoftware.Drawing;

// Generate a QR code from text data
QrCode myQr = QrWriter.Write("Hello World");

// Save QR code as bitmap image
AnyBitmap qrImage = myQr.Save();

// Export to PNG file
qrImage.SaveAs("hello-qr.png");

Imports IronQr
Imports IronSoftware.Drawing

' Generate a QR code from text data
Dim myQr As QrCode = QrWriter.Write("Hello World")

' Save QR code as bitmap image
Dim qrImage As AnyBitmap = myQr.Save()

' Export to PNG file
qrImage.SaveAs("hello-qr.png")

using IronQr;
using IronSoftware.Drawing;

// Configure high error correction level
var options = new QrOptions(QrErrorCorrectionLevel.High);

// Generate QR code with options
QrCode qr = QrWriter.Write("https://ironsoftware.com/csharp/qr/", options);
AnyBitmap image = qr.Save();
image.SaveAs("high-correction-qr.png");

Imports IronQr
Imports IronSoftware.Drawing

' Configure high error correction level
Dim options As New QrOptions(QrErrorCorrectionLevel.High)

' Generate QR code with options
Dim qr As QrCode = QrWriter.Write("https://ironsoftware.com/csharp/qr/", options)
Dim image As AnyBitmap = qr.Save()
image.SaveAs("high-correction-qr.png")

using IronQr;
using IronSoftware.Drawing;

// Create styled QR code with custom colors
var styleOptions = new QrStyleOptions
{
    Dimensions = 300,    // Width and height in pixels
    Margins = 10,        // Quiet zone in pixels
    Color = Color.DarkBlue,
    BackgroundColor = Color.White
};

QrCode qr = QrWriter.Write("https://ironsoftware.com/csharp/qr/");
AnyBitmap styledImage = qr.Save(styleOptions);
styledImage.SaveAs("styled-qr.png");

Imports IronQr
Imports IronSoftware.Drawing

' Create styled QR code with custom colors
Dim styleOptions As New QrStyleOptions With {
    .Dimensions = 300,    ' Width and height in pixels
    .Margins = 10,        ' Quiet zone in pixels
    .Color = Color.DarkBlue,
    .BackgroundColor = Color.White
}

Dim qr As QrCode = QrWriter.Write("https://ironsoftware.com/csharp/qr/")
Dim styledImage As AnyBitmap = qr.Save(styleOptions)
styledImage.SaveAs("styled-qr.png")

using IronQr;
using IronSoftware.Drawing;

QrCode qr = QrWriter.Write("Format demonstration");
AnyBitmap image = qr.Save();

// Save to raster image formats
image.SaveAs("qr-output.png");
image.SaveAs("qr-output.jpg");
image.SaveAs("qr-output.gif");

// Get as byte array for HTTP responses or database storage
byte[] pngBytes = image.ExportBytes();

Imports IronQr
Imports IronSoftware.Drawing

Dim qr As QrCode = QrWriter.Write("Format demonstration")
Dim image As AnyBitmap = qr.Save()

' Save to raster image formats
image.SaveAs("qr-output.png")
image.SaveAs("qr-output.jpg")
image.SaveAs("qr-output.gif")

' Get as byte array for HTTP responses or database storage
Dim pngBytes As Byte() = image.ExportBytes()

using IronQr;
using IronSoftware.Drawing;

// Encode binary data -- useful for encrypted payloads or binary identifiers
byte[] binaryData = System.Text.Encoding.UTF8.GetBytes("Binary content example");
QrCode qr = QrWriter.Write(binaryData);
qr.Save().SaveAs("binary-qr.png");

Imports IronQr
Imports IronSoftware.Drawing

' Encode binary data -- useful for encrypted payloads or binary identifiers
Dim binaryData As Byte() = System.Text.Encoding.UTF8.GetBytes("Binary content example")
Dim qr As QrCode = QrWriter.Write(binaryData)
qr.Save().SaveAs("binary-qr.png")

using IronQr;
using IronSoftware.Drawing;

// Load an existing image containing a QR code
var inputImage = AnyBitmap.FromFile("qr-to-read.png");

// Read all QR codes in the image
QrReadResult readResult = QrReader.Read(inputImage);

foreach (QrResult result in readResult.QrCodes)
{
    // Access the decoded value
    Console.WriteLine($"Decoded: {result.Value}");
}

Imports IronQr
Imports IronSoftware.Drawing

' Load an existing image containing a QR code
Dim inputImage = AnyBitmap.FromFile("qr-to-read.png")

' Read all QR codes in the image
Dim readResult As QrReadResult = QrReader.Read(inputImage)

For Each result As QrResult In readResult.QrCodes
    ' Access the decoded value
    Console.WriteLine($"Decoded: {result.Value}")
Next

using IronQr;
using IronSoftware.Drawing;

var builder = WebApplication.CreateBuilder(args);
var app = builder.Build();

// Set license key at application startup
IronQr.License.LicenseKey = "YOUR-LICENSE-KEY-HERE";

// Return a QR code PNG for a given URL parameter
app.MapGet("/qr", (string data) =>
{
    QrCode qr = QrWriter.Write(data);
    AnyBitmap image = qr.Save();
    byte[] pngBytes = image.ExportBytes();
    return Results.File(pngBytes, "image/png");
});

app.Run();

Imports IronQr
Imports IronSoftware.Drawing

Dim builder = WebApplication.CreateBuilder(args)
Dim app = builder.Build()

' Set license key at application startup
IronQr.License.LicenseKey = "YOUR-LICENSE-KEY-HERE"

' Return a QR code PNG for a given URL parameter
app.MapGet("/qr", Function(data As String)
                      Dim qr As QrCode = QrWriter.Write(data)
                      Dim image As AnyBitmap = qr.Save()
                      Dim pngBytes As Byte() = image.ExportBytes()
                      Return Results.File(pngBytes, "image/png")
                  End Function)

app.Run()

using IronQr;
using IronSoftware.Drawing;

// Specify dimensions and quiet zone for print output
var printOptions = new QrStyleOptions
{
    Dimensions = 600,   // High resolution for print
    Margins = 20        // Generous quiet zone for reliable scanning
};

QrCode qr = QrWriter.Write("https://ironsoftware.com/csharp/qr/");
AnyBitmap printImage = qr.Save(printOptions);
printImage.SaveAs("print-ready-qr.png");

Imports IronQr
Imports IronSoftware.Drawing

' Specify dimensions and quiet zone for print output
Dim printOptions As New QrStyleOptions With {
    .Dimensions = 600,   ' High resolution for print
    .Margins = 20        ' Generous quiet zone for reliable scanning
}

Dim qr As QrCode = QrWriter.Write("https://ironsoftware.com/csharp/qr/")
Dim printImage As AnyBitmap = qr.Save(printOptions)
printImage.SaveAs("print-ready-qr.png")