Delphi ActiveX

Markdown to HTML - Full Document, ChatGPT Theme with Code Syntax Highlighting

See more Markdown Examples

Demonstrates how to convert a complete Markdown document to HTML using the pre-defined "ChatGPT" theme but also with Cloudfare Prism's code syntax highlighting. Delphi ActiveX

uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Chilkat_TLB;

...

procedure TForm1.Button1Click(Sender: TObject);
var
success: Integer;
options: TChilkatJsonObject;
sbMarkdown: TChilkatStringBuilder;
sbHtml: TChilkatStringBuilder;

begin
success := 0;

success := 0;

// Select the pre-defined "ChatGPT" style.
options := TChilkatJsonObject.Create(Self);
options.UpdateString('theme','ChatGPT');

// We can also set an option for the max-width, which by default is "72ch".
options.UpdateString('ChatGPT.max-width','120ch');

// We can add extra content to the bottom of the HTML head and body sections like this:
// Here we are using the "tomorrow" theme.
options.UpdateString('extraHead','<link rel="stylesheet" href="https://cdnjs.cloudflare.com/ajax/libs/prism/1.29.0/themes/prism-tomorrow.min.css" />');
options.UpdateString('extraBody','<script src="https://cdnjs.cloudflare.com/ajax/libs/prism/1.29.0/prism.min.js"></script><script src ="https://cdnjs.cloudflare.com/ajax/libs/prism/1.29.0/plugins/autoloader/prism-autoloader.min.js"></script>');

sbMarkdown := TChilkatStringBuilder.Create(Self);
sbHtml := TChilkatStringBuilder.Create(Self);

success := sbMarkdown.LoadFile('qa_data/markdown/test1.md','utf-8');
if (success = 0) then
  begin
    Memo1.Lines.Add(sbMarkdown.LastErrorText);
    Exit;
  end;

sbMarkdown.MarkdownToHtml(options.ControlInterface,sbHtml.ControlInterface);
sbHtml.ToCRLF();

Memo1.Lines.Add(sbHtml.GetAsString());

// The sample markdown input for this example is identical to the one at Markdown to HTML - Full Document, Raw, where you can view it.

// Sample HTML output as viewed in a browser:

// 
end;