using IronQr;
using IronSoftware.Drawing;
using Microsoft.Win32;
// Open a file dialog to select a QR code image
var dialog = new OpenFileDialog
{
Title = "Select a QR code image",
Filter = "Image Files|*.png;*.jpg;*.jpeg;*.bmp;*.gif;*.tiff"
};
if (dialog.ShowDialog() == true)
{
// Load the selected image into IronQR
var inputBmp = AnyBitmap.FromFile(dialog.FileName);
QrImageInput imageInput = new QrImageInput(inputBmp);
// Create a QR Reader object and read the image
QrReader reader = new QrReader();
IEnumerable<QrResult> results = reader.Read(imageInput);
// Display the first result
ResultLabel.Text = results.FirstOrDefault()?.Value ?? "No QR code found.";
}
Imports IronQr
Imports IronSoftware.Drawing
Imports Microsoft.Win32
' Open a file dialog to select a QR code image
Dim dialog = New OpenFileDialog With {
.Title = "Select a QR code image",
.Filter = "Image Files|*.png;*.jpg;*.jpeg;*.bmp;*.gif;*.tiff"
}
If dialog.ShowDialog() = True Then
' Load the selected image into IronQR
Dim inputBmp = AnyBitmap.FromFile(dialog.FileName)
Dim imageInput As New QrImageInput(inputBmp)
' Create a QR Reader object and read the image
Dim reader As New QrReader()
Dim results As IEnumerable(Of QrResult) = reader.Read(imageInput)
' Display the first result
ResultLabel.Text = If(results.FirstOrDefault()?.Value, "No QR code found.")
End If
Imports IronQr
Imports IronSoftware.Drawing
Imports Microsoft.Win32
' Open a file dialog to select a QR code image
Dim dialog = New OpenFileDialog With {
.Title = "Select a QR code image",
.Filter = "Image Files|*.png;*.jpg;*.jpeg;*.bmp;*.gif;*.tiff"
}
If dialog.ShowDialog() = True Then
' Load the selected image into IronQR
Dim inputBmp = AnyBitmap.FromFile(dialog.FileName)
Dim imageInput As New QrImageInput(inputBmp)
' Create a QR Reader object and read the image
Dim reader As New QrReader()
Dim results As IEnumerable(Of QrResult) = reader.Read(imageInput)
' Display the first result
ResultLabel.Text = If(results.FirstOrDefault()?.Value, "No QR code found.")
End If
