(Delphi DLL) Extract Metadata XML from PDF

See more PDF Signatures Examples

Demonstrates how to extract the metadata XML from a PDF.

Chilkat for Delphi Downloads

Chilkat non-ActiveX DLL for Delphi

Chilkat ActiveX DLL for Delphi

* The examples here use the non-ActiveX DLL.

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

...

procedure TForm1.Button1Click(Sender: TObject);
var
pdf: HCkPdf;
success: Boolean;
sbXml: HCkStringBuilder;
xml: HCkXml;
x_xmpmeta_xmlns_x: PWideChar;
x_xmpmeta_x_xmptk: PWideChar;
rdf_RDF_xmlns_rdf: PWideChar;
rdf_Description_rdf_about: PWideChar;
rdf_Description_xmlns_xmp: PWideChar;
rdf_Description_xmlns_dc: PWideChar;
rdf_Description_xmlns_xmpMM: PWideChar;
rdf_Description_xmlns_pdf: PWideChar;
rdf_Description_xmlns_xmpRights: PWideChar;
xmp_ModifyDate: PWideChar;
xmp_CreateDate: PWideChar;
xmp_MetadataDate: PWideChar;
xmp_CreatorTool: PWideChar;
dc_format: PWideChar;
rdf_li_xml_lang: PWideChar;
rdf_li: PWideChar;
i: Integer;
count_i: Integer;
xmpMM_DocumentID: PWideChar;
xmpMM_InstanceID: PWideChar;
pdf_Producer: PWideChar;
pdf_Keywords: PWideChar;
xmpRights_WebStatement: PWideChar;

begin
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

pdf := CkPdf_Create();

success := CkPdf_LoadFile(pdf,'qa_data/pdf/blank_with_metadata.pdf');
if (success = False) then
  begin
    Memo1.Lines.Add(CkPdf__lastErrorText(pdf));
    Exit;
  end;

sbXml := CkStringBuilder_Create();
// Note: Not all PDF files have metadata.  Metadata is optional.
success := CkPdf_GetMetadata(pdf,sbXml);
if (success = False) then
  begin
    Memo1.Lines.Add(CkPdf__lastErrorText(pdf));
    Exit;
  end;

xml := CkXml_Create();
CkXml_LoadSb(xml,sbXml,True);

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

// Sample PDF metadata XML:
// (Code for parsing follows)

// Use this online tool to generate parsing code from sample XML: 
// Generate Parsing Code from XML

// <?xml version="1.0" encoding="utf-8"?>
// <x:xmpmeta xmlns:x="adobe:ns:meta/" x:xmptk="Adobe XMP Core 9.1-c001 79.675d0f7, 2023/06/11-19:21:16        ">
//     <rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#">
//         <rdf:Description rdf:about="" xmlns:xmp="http://ns.adobe.com/xap/1.0/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:xmpMM="http://ns.adobe.com/xap/1.0/mm/" xmlns:pdf="http://ns.adobe.com/pdf/1.3/" xmlns:xmpRights="http://ns.adobe.com/xap/1.0/rights/">
//             <xmp:ModifyDate>2024-11-27T11:33:12-06:00</xmp:ModifyDate>
//             <xmp:CreateDate>2024-11-27T11:28:23-06:00</xmp:CreateDate>
//             <xmp:MetadataDate>2024-11-27T11:33:12-06:00</xmp:MetadataDate>
//             <xmp:CreatorTool>Adobe Acrobat Pro (32-bit) 24.3.20112</xmp:CreatorTool>
//             <dc:format>application/pdf</dc:format>
//             <dc:title>
//                 <rdf:Alt>
//                     <rdf:li xml:lang="x-default">Blank</rdf:li>
//                 </rdf:Alt>
//             </dc:title>
//             <dc:creator>
//                 <rdf:Bag>
//                     <rdf:li>Chilkat Software</rdf:li>
//                 </rdf:Bag>
//             </dc:creator>
//             <dc:description>
//                 <rdf:Alt>
//                     <rdf:li xml:lang="x-default">Blank Document</rdf:li>
//                 </rdf:Alt>
//             </dc:description>
//             <dc:subject>
//                 <rdf:Bag>
//                     <rdf:li>blank</rdf:li>
//                     <rdf:li>metadata</rdf:li>
//                     <rdf:li>document</rdf:li>
//                 </rdf:Bag>
//             </dc:subject>
//             <xmpMM:DocumentID>uuid:34535ffa-b632-43f1-b1fd-80cea6fdc351</xmpMM:DocumentID>
//             <xmpMM:InstanceID>uuid:69ace620-4c54-407f-8d45-6eebc90f34c2</xmpMM:InstanceID>
//             <pdf:Producer>Adobe Acrobat Pro (32-bit) 24.3.20112</pdf:Producer>
//             <pdf:Keywords>blank; metadata; document</pdf:Keywords>
//             <xmpRights:WebStatement>https://www.chilkatsoft.com/</xmpRights:WebStatement>
//         </rdf:Description>
//     </rdf:RDF>
// </x:xmpmeta>

x_xmpmeta_xmlns_x := CkXml__getAttrValue(xml,'xmlns:x');
x_xmpmeta_x_xmptk := CkXml__getAttrValue(xml,'x:xmptk');
rdf_RDF_xmlns_rdf := CkXml__chilkatPath(xml,'rdf:RDF|(xmlns:rdf)');
rdf_Description_rdf_about := CkXml__chilkatPath(xml,'rdf:RDF|rdf:Description|(rdf:about)');
rdf_Description_xmlns_xmp := CkXml__chilkatPath(xml,'rdf:RDF|rdf:Description|(xmlns:xmp)');
rdf_Description_xmlns_dc := CkXml__chilkatPath(xml,'rdf:RDF|rdf:Description|(xmlns:dc)');
rdf_Description_xmlns_xmpMM := CkXml__chilkatPath(xml,'rdf:RDF|rdf:Description|(xmlns:xmpMM)');
rdf_Description_xmlns_pdf := CkXml__chilkatPath(xml,'rdf:RDF|rdf:Description|(xmlns:pdf)');
rdf_Description_xmlns_xmpRights := CkXml__chilkatPath(xml,'rdf:RDF|rdf:Description|(xmlns:xmpRights)');
xmp_ModifyDate := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|xmp:ModifyDate');
xmp_CreateDate := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|xmp:CreateDate');
xmp_MetadataDate := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|xmp:MetadataDate');
xmp_CreatorTool := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|xmp:CreatorTool');
dc_format := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|dc:format');
rdf_li_xml_lang := CkXml__chilkatPath(xml,'rdf:RDF|rdf:Description|dc:title|rdf:Alt|rdf:li|(xml:lang)');
rdf_li := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|dc:title|rdf:Alt|rdf:li');
rdf_li := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|dc:creator|rdf:Bag|rdf:li');
rdf_li_xml_lang := CkXml__chilkatPath(xml,'rdf:RDF|rdf:Description|dc:description|rdf:Alt|rdf:li|(xml:lang)');
rdf_li := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|dc:description|rdf:Alt|rdf:li');
i := 0;
count_i := CkXml_NumChildrenHavingTag(xml,'rdf:RDF|rdf:Description|dc:subject|rdf:Bag|rdf:li');
while i < count_i do
  begin
    CkXml_putI(xml,i);
    rdf_li := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|dc:subject|rdf:Bag|rdf:li[i]');
    i := i + 1;
  end;

xmpMM_DocumentID := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|xmpMM:DocumentID');
xmpMM_InstanceID := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|xmpMM:InstanceID');
pdf_Producer := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|pdf:Producer');
pdf_Keywords := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|pdf:Keywords');
xmpRights_WebStatement := CkXml__getChildContent(xml,'rdf:RDF|rdf:Description|xmpRights:WebStatement');

CkPdf_Dispose(pdf);
CkStringBuilder_Dispose(sbXml);
CkXml_Dispose(xml);

end;