AttachmentType - TPdf - PDFium Delphi Component

Component: TPdf · Unit: PDFium

Vrne registriran niz MIME oziroma podtipa za vdelano datoteko pri navedenem 0-osnovanem indeksu. Vrednost je vzeta iz vnosa /Subtype slovarja specifikacije datoteke, kot je določeno v razdelku 7.11.3 specifikacije PDF

Syntax

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

Description

Slovar specifikacije datoteke PDF lahko vsebuje neobvezno ime /Subtype, ki kodira vrsto MIME IANA vdelane vsebine (na primer application#2Fpdf, image#2Fpng, text#2Fcsv). PDFiumPas odkodira šestnajstiška ubežna zapisa PDF (#2F nazaj v /) in vrednost izpostavi kot običajni niz Unicode, kot sta "application/pdf" ali "image/png".

To lastnost uporabite za odločitev, kako razporediti izvlečene bajte — na primer odpiranje prilog application/pdf v drugem primerku TPdf, pošiljanje slik v TImage ali shranjevanje vsega ostalega prek pogovornega okna za shranjevanje. Kadar avtor ni zapisal podtipa, lastnost vrne prazen niz; v tem primeru se zanesite na ugibanje po priponi imena AttachmentName.

Lastnost je samo za branje. Vnos MIME je določen ob ustvarjanju priloge znotraj PDFium-a in ga ni mogoče spreminjati na mestu; če morate podtip prepisati, ponovno ustvarite mesto priloge.

Parameters

Index Integer. Zero-based attachment slot. Must satisfy 0 <= Index < AttachmentCount. Out-of-range indexes return an empty string.

Remarks

Starejši ustvarjalci PDF (pred letom 2008) so /Subtype pogosto izpustili povsem. Ne obravnavajte prazne vrste kot napake.
Niz je surova zapisava MIME, shranjena v datoteki; ni normaliziran. Pri usmerjanju primerjajte neobčutljivo na velike in male črke.
Združite z AttachmentName za popoln prikazovan par v plošči prilog datotek.

Example

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;

AttachmentType property