Planet PDF Forum Archive

Planet PDF ForumWowsers! This is page is old, head to the LIVE Planet PDF Forum. It features more than 10 conferences, covering everything from beginner to in-depth developer and pre-press discussions. If you wish to continue... one & two archive covers 1999-2011 (160,000 pages).


New Forum | Previous | Next | (P-PDF) Developers


Topic: FindText and FindNextText
Conf: (P-PDF) Developers, Msg: 53354
From: Satellite
Date: 5/29/2002 04:58 PM

Hi

I am working on a FindText code (VB 6), the rutine is working fine, im am not 100%
sure what the hilitelist does...

How can i know if there is more occurences of my "Patteren" on the page, and
how do i write a findNext rutine.

The whole idea is to build a list/Array of occurences of my patteren

Like this

Patteren page Acrorect.button, acrorect.left etc...
MyPat 4 224 390
MyPat 4 284 200
MyPat 38 110 190
MyPat 41 234 370
MyPat 48 432 330
MyPat 78 270 690

etc....

This is my FindText Code..
---------------------------------------------------------
Private Sub FindText(Patteren as string)
Dim hList As CAcroHiliteList
Dim pdPage As CAcroPDPage
Dim pdTextSelect As CAcroPDTextSelect
Dim avPageView As CAcroAVPageView
Dim AcroRect As CAcroRect

Ok = AVDoc.FindText(Patteren, False, False, True)
Set hList = CreateObject("AcroExch.HiliteList")
hList.Add 0, 10

Set avPageView = AVDoc.GetAVPageView()
Set pdPage = avPageView.GetPage()
Set pdTextSelect = pdPage.CreatePageHilite(hList)
Set pdTextSelect = pdPage.CreateWordHilite(hList)

AVDoc.SetTextSelection pdTextSelect
Set AcroRect = pdTextSelect.GetBoundingRect

end sub
---------------------------------------------------------

does anyone has any ideas?

Best regards
Frank

PDF In-Depth Free Product Trials Ubiquitous PDF

Debenu Aerialist

The ultimate plug-in for Adobe Acrobat. Advanced splitting, merging, stamping, bookmarking, and link...

Download free demo

Debenu PDF Tools Pro

It's simple to use and will let you preview and edit PDF files, it's a Windows application that makes...

Download free demo

Back to the past, 15 years ago! Open Publish 2002

Looking back to 2002, it's amazing how much of the prediction became a reality. Take a read and see what you think!

September 14, 2017
Platinum Sponsor





Search Planet PDF
more searching options...
Planet PDF Newsletter
Most Popular Articles
Featured Product

Debenu PDF Aerialist

The ultimate plug-in for Adobe Acrobat. Advanced splitting, merging, stamping, bookmarking, and link control. Take Acrobat to the next level.

Features

Adding a PDF Stamp Comment

OK, so you want to stamp your document. Maybe you need to give reviewers some advice about the document's status or sensitivity. This tip from author Ted Padova demonstrates how to add stamps with the Stamp Tool along with related comments.