Delphi ActiveX Requires Chilkat v11.7.0+
Delphi ActiveX
Embed a QR Code in HTML as a Data URI
See more QR Code Examples
Demonstrates putting a QR code directly into an HTML page or HTML email with no separate image file. The base64 PNG returned by QrCode becomes the src of an img tag as a data URI, which is the MIME type from outputs[0].mimeType followed by the base64 from outputs[0].base64.Chilkat Delphi ActiveX Downloads
var
success: Integer;
json: TChilkatJsonObject;
fmt: TChilkatFormats;
jsonOut: TChilkatJsonObject;
sbHtml: TChilkatStringBuilder;
begin
success := 0;
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
json := TChilkatJsonObject.Create(Self);
json.UpdateString('payload.text','https://www.chilkatsoft.com/');
json.UpdateInt('render.moduleSize',5);
fmt := TChilkatFormats.Create(Self);
jsonOut := TChilkatJsonObject.Create(Self);
success := fmt.QrCode('generate',json.ControlInterface,jsonOut.ControlInterface);
if (success = 0) then
begin
Memo1.Lines.Add(fmt.LastErrorText);
Exit;
end;
// A data URI has the form data:<MIME type>;base64,<base64 data>
sbHtml := TChilkatStringBuilder.Create(Self);
sbHtml.Append('<html><body><p>Scan to visit chilkatsoft.com</p><img alt="QR code" width="');
sbHtml.AppendInt(jsonOut.IntOf('outputs[0].width'));
sbHtml.Append('" height="');
sbHtml.AppendInt(jsonOut.IntOf('outputs[0].height'));
sbHtml.Append('" src="data:');
sbHtml.Append(jsonOut.StringOf('outputs[0].mimeType'));
sbHtml.Append(';base64,');
sbHtml.Append(jsonOut.StringOf('outputs[0].base64'));
sbHtml.Append('"></body></html>');
success := sbHtml.WriteFile('qa_output/qr_page.html','utf-8',0);
if (success = 0) then
begin
Memo1.Lines.Add(sbHtml.LastErrorText);
Exit;
end;
Memo1.Lines.Add('image: ' + IntToStr(jsonOut.IntOf('outputs[0].width')) + ' x ' + IntToStr(jsonOut.IntOf('outputs[0].height')) + ' pixels');
Memo1.Lines.Add('HTML length: ' + IntToStr(sbHtml.Length));
// The page, as a browser shows it:
//
// Sample output:
// image: 185 x 185 pixels
// HTML length: 1211