/Author girdisinin değerini döndürürproperty Author: WString; // read only
Author, özgün belgeyi oluşturan kişi ya da kuruluşun insan tarafından okunabilir adını döndürür. İçeride özellik, MetaText['Author'] etrafında ince bir sarmalayıcıdır; bu da PDFium'un FPDF_GetMetaText çağrısını kullanarak /Author dizesini belgenin bilgi sözlüğünden okur (trailer içindeki /Info anahtarının işaret ettiği sözlük — ISO 32000-1, section 14.3.3 "Document Information Dictionary" bölümüne bakın).
Belge bir yazar bildirmiyorsa ya da belge şu anda yüklenmemişse sonuç boş bir WString olur. Özellik hiçbir zaman istisna yükseltmez — "yazar kaydı yok" için doğru işaret boş dizedir. Alttaki PDFium API ham PDFDocEncoding ya da UTF-16BE bayt dizesini sizin için UTF-16'ya çözdüğü için sonuç her zaman yerel Delphi WideString kodlamasıyla döner ve doğrudan bir TStrings, TLabel ya da başka bir Unicode uyumlu yüzeye atanabilir.
Özellik salt okunurdur. Yeni oluşturulmuş ya da yüklenmiş bir belgede yazarı ayarlamak için, Document tanıtıcısı üzerinden daha alt düzeydeki FPDF_SetMetaText içe aktarmasını kullanın ya da meta veri akışı üzerinden bir XMP paketini yazın ya da yenileyin.
True olması gerekir (bir belgenin yüklenmiş olması gerekir). Bunu etkin olmayan bir bileşende okumak yalnızca boş bir dize döndürür — eksik bir giriş için istisna yükseltilmez.FE FF) bulunan UTF-16BE bayt dizeleri olarak saklar. PDFium her iki biçimi de çözer; kodlama ile doğrudan uğraşmanız gerekmez.Author boşsa ama Acrobat'ın özellikler iletişim kutusunda bir yazar görüyorsanız, değeri XMP paketinde (dc:creator) arayın.
procedure TForm1.ShowDocumentInfo;
begin
Pdf1.FileName := 'C:\Docs\Report.pdf';
Pdf1.Active := True;
try
Memo1.Lines.Add('Title: ' + Pdf1.Title);
Memo1.Lines.Add('Author: ' + Pdf1.Author);
Memo1.Lines.Add('Subject: ' + Pdf1.Subject);
if Pdf1.Author = '' then
Memo1.Lines.Add(' (no /Author entry in info dictionary)');
finally
Pdf1.Active := False;
end;
end;