Search text in PDF
Search text in PDF
This article shows how to search a PDF for text in C# using the Document. Find method and the TextFindCriteria and TextMatchEnumerator classes.
This code sample visualizes the results by saving a copy of the searched document with all matches highlighted and marked with the match position (first match, second match, etc.).
Resulting PDF page
This is what the result of the below code sample looks like:
C# code sample – search text in PDF
It is possible to search text on a specific page by calling Page.Find or in the entire PDF document by calling Document.Find. The signature of both methods is the same. The search criteria are defined by passing a TextFindCriteria instance. The results are returned as a TextMatchEnumerator instance. This code sample demonstrates Document.Find but everything applies to Page.Find as well.
// open PackingLightBrochure.
using ( FileStream fileIn = new FileStream( @"..\..\..\inputDocuments\PackingLightBrochure.pdf", FileMode.Open, FileAccess.Read ) )
{
//create document
Document document = new Document( fileIn );
//criteria for searching "PDF", it does not have to match a whole word and the case also does not have to match
TextFindCriteria criteria = new TextFindCriteria( "PDF", false, false );
//get a list of search results
TextMatchEnumerator enumerator = document.Find( criteria );
int resultIndex = 0;
foreach( TextMatch match in enumerator )
{
GlyphCollection glyphs = match.Glyphs;
Glyph firstGlyph = glyphs[0];
Glyph lastGlyph = glyphs[glyphs.Count - 1];
//create a rectangle over the found text.
RectangleShape rect = new RectangleShape(
firstGlyph.BottomLeft.X,
firstGlyph.BottomLeft.Y,
lastGlyph.TopRight.X - firstGlyph.BottomLeft.X,
lastGlyph.TopRight.Y - firstGlyph.BottomLeft.Y );
rect.Brush = new SolidBrush( System.Drawing.Color.Yellow );
rect.Pen = null; //the rectangle has no outline
rect.Opacity = 128;
//coordinates are in Overlay space, not VisualOverlay space.
match.Page.Overlay.Add(rect);
//now we create a textshape to print the result index onto.
MultilineTextShape textShape = new MultilineTextShape();
TranslateTransform translate = new TranslateTransform( firstGlyph.BottomLeft.X, firstGlyph.BottomLeft.Y );
textShape.Transform = translate;
textShape.Width = lastGlyph.TopRight.X - firstGlyph.BottomLeft.X;
textShape.Height = lastGlyph.TopRight.Y - firstGlyph.BottomLeft.Y;
translate.Y += textShape.Height; //correct different origin.
textShape.HorizontalAlignment = HorizontalAlignment.Center;
textShape.Opacity = 200;
Fragment fragment = new Fragment((++resultIndex).ToString(), 0); //0 means autosized.
fragment.TextColor = RgbColor.Red;
textShape.Fragments.Add( fragment );
//add the text to the page and print it over the yellow rectangle
match.Page.Overlay.Add( textShape );
}
//write the new PDF document
using ( FileStream fileOut = new FileStream( @"..\..\searchtext.pdf", FileMode.Create, FileAccess.Write ) )
{
document.Write( fileOut );
}
}
' open PackingLightBrochure.
Using fileIn As New FileStream("..\..\..\inputDocuments\PackingLightBrochure.pdf", FileMode.Open, FileAccess.Read)
'create document
Dim document As New Document(fileIn)
Dim criteria As New TextFindCriteria("PDF", False, False)
'criteria.Backwards = true;
Dim enumerator As TextMatchEnumerator = document.Find(criteria)
Dim order As Integer = 0
For Each match As TextMatch In enumerator
Console.WriteLine("Match found at page: " & match.Page.Index)
Dim glyphs As GlyphCollection = match.Glyphs
Dim firstGlyph As Glyph = glyphs(0)
Dim lastGlyph As Glyph = glyphs(glyphs.Count - 1)
'create a rectangle over the found text.
Dim rect As New RectangleShape(firstGlyph.BottomLeft.X, firstGlyph.BottomLeft.Y, lastGlyph.TopRight.X - firstGlyph.BottomLeft.X, lastGlyph.TopRight.Y - firstGlyph.BottomLeft.Y)
rect.Brush = New SolidBrush(System.Drawing.Color.Yellow)
rect.Pen = Nothing
rect.Opacity = 128
'coordinated are in Overlay space, not VisualOverlay space.
match.Page.Overlay.Add(rect)
'print the order.
Dim textShape As New MultilineTextShape()
Dim translate As New TranslateTransform(firstGlyph.BottomLeft.X, firstGlyph.BottomLeft.Y)
textShape.Transform = translate
textShape.Width = lastGlyph.TopRight.X - firstGlyph.BottomLeft.X
textShape.Height = lastGlyph.TopRight.Y - firstGlyph.BottomLeft.Y
translate.Y += textShape.Height
'correct different origin.
textShape.HorizontalAlignment = HorizontalAlignment.Center
textShape.Opacity = 200
Dim fragment As New Fragment((System.Threading.Interlocked.Increment(order)).ToString(), 0)
'autosized.
fragment.TextColor = TallComponents.PDF.Colors.RgbColor.Red
textShape.Fragments.Add(fragment)
match.Page.Overlay.Add(textShape)
Next
Using fileOut As New FileStream("..\..\searchtext.pdf", FileMode.Create, FileAccess.Write)
document.Write(fileOut)
End Using
End Using