Sample code for 30+ languages & platforms
Delphi DLL

Setting the XML DOCTYPE

See more XML Examples

Demonstrates setting an XML document's DOCTYPE. The sample code below produces the following XML output:
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">

<html>
    <body>This is the HTML body</body>
</html>

Chilkat Delphi DLL Downloads

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

...

procedure TForm1.Button1Click(Sender: TObject);
var
root: HCkXml;

begin
root := CkXml_Create();

CkXml_putTag(root,'html');

CkXml_putDocType(root,'<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">');

CkXml_NewChild2(root,'body','This is the HTML body');

Memo1.Lines.Add(CkXml__getXml(root));

CkXml_Dispose(root);

end;