AttachmentType - TPdf - PDFium Delphi Component

Komponenta: TPdf · Jedinica: PDFium

Vraća registrirani MIME / subtype niz za ugrađenu datoteku na zadanom indeksu počevši od nule. Vrijednost se preuzima iz unosa /Subtype u rječniku specifikacije datoteke kako je definirano u PDF odjeljku 7.11.3

Sintaksa

property AttachmentType[Index: Integer]: WString; // read only

Opis

Rječnik specifikacije PDF datoteke može nositi neobavezno ime /Subtype koje kodira IANA MIME vrstu ugrađenog tereta (na primjer application#2Fpdf, image#2Fpng, text#2Fcsv). PDFium Delphi Component dekodira PDF heksadecimalne escape sekvence (#2F natrag u /) i izlaže vrijednost kao obični Unicode niz poput "application/pdf" ili "image/png"

Koristite ovo svojstvo za odluku kako raspodijeliti izdvojene bajtove — primjerice, otvaranje privitaka application/pdf ugrađeno u drugoj instanci TPdf, slanje slika u TImage ili spremanje svega ostalog putem dijaloga spremanja. Kada autor nije zabilježio podvrstu, svojstvo vraća prazan niz; u tom se slučaju vratite na njuškanje ekstenzije na AttachmentName

Svojstvo je samo za čitanje. MIME unos fiksira se u trenutku stvaranja privitka unutar PDFiuma i ne može se mijenjati na mjestu; ponovno stvorite utor ako morate prepisati podvrstu

Parametri

Index Integer. Utor privitka s početkom od nule. Mora zadovoljavati 0 <= Index < AttachmentCount. Indeksi izvan raspona vraćaju prazan niz

Napomene

Stariji proizvođači PDF-a (prije 2008) često su potpuno izostavljali /Subtype. Ne tretirajte praznu vrstu kao pogrešku
Niz je sirov MIME zapis pohranjen u datoteci; nije normaliziran. Uspoređujte bez osjetljivosti na velika i mala slova pri usmjeravanju
Kombinirajte s AttachmentName za potpunu n-torku prikaza u ploči privitaka datoteka

Primjer

var
  I: Integer;
  Mime, Name: string;
begin
  Pdf1.LoadFromFile('mixed-attachments.pdf');
  for I := 0 to Pdf1.AttachmentCount - 1 do
  begin
    Name := Pdf1.AttachmentName[I];
    Mime := LowerCase(Pdf1.AttachmentType[I]);
    if Mime = 'application/pdf' then
      Memo1.Lines.Add('PDF: ' + Name)
    else if StartsText('image/', Mime) then
      Memo1.Lines.Add('Image: ' + Name)
    else
      Memo1.Lines.Add(Format('%s [%s]', [Name, Mime]));
  end;
end;

Vidi također

Attachment, AttachmentCount, AttachmentName, CreateAttachment, DeleteAttachment