Delphi ActiveX

Markdown to HTML - Full Document, ChatGPT Theme

Demonstrates how to convert a complete Markdown document to HTML using the pre-defined "ChatGPT" theme. The "ChatGPT" theme produces a full HTML document including:

Document Type Declaration (e.g. <!DOCTYPE html>)
Root Element (e.g., <html> )
Head Section
Enclosing <body> and </body> elements
Closing </html> element

The Head Section includes style definitions that display the HTML in a style similar to the ChatGPT app. (How did Chilkat do it? We simply asked ChatGPT to generate CSS that is similar in style to the HTML displayed in the ChatGPT app.)

Chilkat Delphi ActiveX Downloads

Download Chilkat for Delphi ActiveX

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;

// 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');

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:
// 
// To add code syntax highlighting, see the example at Markdown to HTML - Full Document, ChatGPT Theme with Code Syntax Highlighting

// 
end;