TFbmItem.ExtractTextFromAttachment
Diese Funktion ist eine Methode der Klasse TFbmItem und welche in der Unit Item definiert wurde. Der Funktionstyp ist Funktion. Der Rückgabetyp ist vom Typ string.
Die Funktion verlangt folgende Parameter:
Parameter |
Typ |
Beschreibung |
---|---|---|
Attachment | TFbmAttachmentItem | Der gewünschte Anhang. Eine Instanz des Anhangs kann über Item.Attachments ermittelt und anschließend an diese Funktion übergeben werden. |
Liefert für einen Anhang den extrahierten Text. Kann je nach Dateityp eine gewisse Zeit in Anspruch nehmen.
Verwendungsbeispiel, um Text aus dem letzten Anhang zu extrahieren:
1
2
3
4
5
6
7
8
9
10
2
3
4
5
6
7
8
9
10
var
Text: string;
begin
if Item.Attachments.Count > 0 then
begin
Text := Item.ExtractTextFromAttachment(Item.Attachments.Last);
// Hier kann nun die Variable Text analysiert werden.
end;
end.
Text: string;
begin
if Item.Attachments.Count > 0 then
begin
Text := Item.ExtractTextFromAttachment(Item.Attachments.Last);
// Hier kann nun die Variable Text analysiert werden.
end;
end.
Verwendungsbeispiel, um den Text aus allen PDF-Anhänge zu extrahieren:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
var
i: Integer;
AttachmentIndizes: TFbmIntegerList;
Text: string;
begin
AttachmentIndizes := TFbmIntegerList.Create;
try
Item.Attachments.ListHighestRevisionPerGroup(AttachmentIndizes);
for i := 0 to AttachmentIndizes.Count - 1 do
begin
if Item.Attachments[AttachmentIndizes[i]].ContentType = 'application/pdf' then
begin
Text := Item.ExtractTextFromAttachment(Item.Attachments[AttachmentIndizes[i]]);
// Hier kann nun die Variable Text analysiert werden. Die Schleife kann mittels Break; jederzeit beendet werden.
end;
end;
finally
AttachmentIndizes.Free;
end;
end.
i: Integer;
AttachmentIndizes: TFbmIntegerList;
Text: string;
begin
AttachmentIndizes := TFbmIntegerList.Create;
try
Item.Attachments.ListHighestRevisionPerGroup(AttachmentIndizes);
for i := 0 to AttachmentIndizes.Count - 1 do
begin
if Item.Attachments[AttachmentIndizes[i]].ContentType = 'application/pdf' then
begin
Text := Item.ExtractTextFromAttachment(Item.Attachments[AttachmentIndizes[i]]);
// Hier kann nun die Variable Text analysiert werden. Die Schleife kann mittels Break; jederzeit beendet werden.
end;
end;
finally
AttachmentIndizes.Free;
end;
end.