Size of OCRd text

[charuvasudev]

Hi,

I have used PDFXchange and tesseract for OCR in my project. And it works fine. My only concern is that the font size of the OCRd text which is added in the text layer of the pdf file is too small. When I do Ctrl+F and search for a key word, it highlights the text. The highlight is so small that it appears like a dot which is easily missed. Shouldn't the font size be automatcally calculated? It works as expected in your end user control. see the attached image for more clarity.

Here is the code-

Dim Op As PDFXEdit.IOperation = Inst1.CreateOp(nID)
Dim input As PDFXEdit.ICabNode = Op.Params.Root("Input")
Dim fsInst As PDFXEdit.IAFS_Inst = CType(Inst1.GetExtension("AFS"), PDFXEdit.IAFS_Inst)
Dim impPath As PDFXEdit.IAFS_Name = fsInst.DefaultFileSys.StringToName(OpenFileDialog1.FileName)
Dim stroutputpath As String = System.IO.Path.GetDirectoryName(OpenFileDialog1.FileName) & "\" & System.IO.Path.GetFileNameWithoutExtension(OpenFileDialog1.FileName) & DateTime.Now.ToString("MMddyyymmss") & ".pdf"
Dim fsInst1 As PDFXEdit.IAFS_Inst = CType(Inst1.GetExtension("AFS"), PDFXEdit.IAFS_Inst)
Dim outPath As PDFXEdit.IAFS_Name = fsInst1.DefaultFileSys.StringToName(stroutputpath)
Dim pxcInst As PDFXEdit.IPXC_Inst = CType(Inst1.GetExtension("PXC"), PDFXEdit.IPXC_Inst)
Dim resDoc As PDFXEdit.IPXC_Document = pxcInst.OpenDocumentFrom(impPath, Nothing)
input.v = resDoc
Dim options As PDFXEdit.ICabNode = Op.Params.Root("Options")
options("OutputType").v = 0
options("OCRNoTextPagesOnly").v = True
Try
Op.Do()
Catch ex As Exception
resDoc.Close()
Exit Sub
End Try
resDoc.WriteTo(outPath)
resDoc.Close()


Pls guide.

2025-12-25 12_17_25-.png

[charuvasudev]

Hi,

Any update on my issue?

[Daniel - PDF-XChange]

Hello, charuvasudev

You posted this during the holidays, we have a bit of a backlog, but the Dev team is working through things. I cannot promise when they will be able to respond, but we will be back to you once they have taken a look.

Kind regards,

[Vasyl - PDF-XChange]

Hi, charuvasudev.

Maybe the difference is because the Editor EU uses the newer "op.document.OCRPages2" operation internally, instead of the much older and now-obsolete "op.document.OCRPages", which you use. I recommend starting to use the new version with the "SkipPagesWithText" parameter, as equivalent of "OCRNoTextPagesOnly" from the older version.

HTH.

[Anushka]

Hi, charuvasudev.

Maybe the difference is because the Editor EU uses the newer "op.document.OCRPages2" operation internally, instead of the much older and now-obsolete "op.document.OCRPages", which you use. I recommend starting to use the new version with the "SkipPagesWithText" parameter, as equivalent of "OCRNoTextPagesOnly" from the older version.

HTH.

Hello Support Team, As per the above quoted suggestion i had updated the newer operation "op.document.OCRPages2" and parameter "SkipPagesWithText" it was working fine but now suddenly this operation gives me exception when I do Op.Do(). I tried moving back to the older operation "op.document.OCRPages" and parameter "OCRNoTextPagesOnly" the execption is not there but the OCR is not properly done as after the operation I don't get any text on searching and trying to select the text.

Below is the code i am trying for reference:

Code: Select all

Dim nID As Integer = pdfctrl.Inst.Str2ID("op.document.OCRPages", False)
'Dim nID As Integer = pdfctrl.Inst.Str2ID("op.document.OCRPages2", False)
Dim Op As PDFXEdit.IOperation = pdfctrl.Inst.CreateOp(nID)
Dim input As PDFXEdit.ICabNode = Op.Params.Root("Input")
Dim clbk As AuthCallback = New AuthCallback()

Dim doc As PDFXEdit.IPXV_Document = pdfctrl.Doc
input.v = doc
Dim options As PDFXEdit.ICabNode = Op.Params.Root("Options")
options("OutputType").v = 0
options("OCRNoTextPagesOnly").v = False
'options("SkipPagesWithText").v = False

Kindly help me identify what can be wrong here.
Thank You.

[Anushka]

Hi, charuvasudev.

Maybe the difference is because the Editor EU uses the newer "op.document.OCRPages2" operation internally, instead of the much older and now-obsolete "op.document.OCRPages", which you use. I recommend starting to use the new version with the "SkipPagesWithText" parameter, as equivalent of "OCRNoTextPagesOnly" from the older version.

HTH.

Hello Support Team, As per the above quoted suggestion i had updated the newer operation "op.document.OCRPages2" and parameter "SkipPagesWithText" it was working fine but now suddenly this operation gives me exception when I do Op.Do(). I tried moving back to the older operation "op.document.OCRPages" and parameter "OCRNoTextPagesOnly" the execption is not there but the OCR is not properly done as after the operation I don't get any text on searching and trying to select the text.

Below is the code i am trying for reference:

Code: Select all

Dim nID As Integer = pdfctrl.Inst.Str2ID("op.document.OCRPages", False)
'Dim nID As Integer = pdfctrl.Inst.Str2ID("op.document.OCRPages2", False)
Dim Op As PDFXEdit.IOperation = pdfctrl.Inst.CreateOp(nID)
Dim input As PDFXEdit.ICabNode = Op.Params.Root("Input")
Dim clbk As AuthCallback = New AuthCallback()

Dim doc As PDFXEdit.IPXV_Document = pdfctrl.Doc
input.v = doc
Dim options As PDFXEdit.ICabNode = Op.Params.Root("Options")
options("OutputType").v = 0
options("OCRNoTextPagesOnly").v = False
'options("SkipPagesWithText").v = False

Kindly help me identify what can be wrong here.
Thank You.

Hello Support Team,
Related to the above query I wanted to add that the new method "op.document.OCRPages2" and parameter "SkipPagesWithText" gives me an exception stating "Error HRESULT E_FAIL has been returned from a call to a COM component." I tried this method even with the latest version of SDK (10.8.4.409) yet there is exception. Also where can I get the latest dlls of Plugins?

Thank You.

[Anushka]

Hi, charuvasudev.

Maybe the difference is because the Editor EU uses the newer "op.document.OCRPages2" operation internally, instead of the much older and now-obsolete "op.document.OCRPages", which you use. I recommend starting to use the new version with the "SkipPagesWithText" parameter, as equivalent of "OCRNoTextPagesOnly" from the older version.

HTH.

Hello Support Team, As per the above quoted suggestion i had updated the newer operation "op.document.OCRPages2" and parameter "SkipPagesWithText" it was working fine but now suddenly this operation gives me exception when I do Op.Do(). I tried moving back to the older operation "op.document.OCRPages" and parameter "OCRNoTextPagesOnly" the execption is not there but the OCR is not properly done as after the operation I don't get any text on searching and trying to select the text.

Below is the code i am trying for reference:

Code: Select all

Dim nID As Integer = pdfctrl.Inst.Str2ID("op.document.OCRPages", False)
'Dim nID As Integer = pdfctrl.Inst.Str2ID("op.document.OCRPages2", False)
Dim Op As PDFXEdit.IOperation = pdfctrl.Inst.CreateOp(nID)
Dim input As PDFXEdit.ICabNode = Op.Params.Root("Input")
Dim clbk As AuthCallback = New AuthCallback()

Dim doc As PDFXEdit.IPXV_Document = pdfctrl.Doc
input.v = doc
Dim options As PDFXEdit.ICabNode = Op.Params.Root("Options")
options("OutputType").v = 0
options("OCRNoTextPagesOnly").v = False
'options("SkipPagesWithText").v = False

Kindly help me identify what can be wrong here.
Thank You.

Hello Support Team,
Related to the above query I wanted to add that the new method "op.document.OCRPages2" and parameter "SkipPagesWithText" gives me an exception stating "Error HRESULT E_FAIL has been returned from a call to a COM component." I tried this method even with the latest version of SDK (10.8.4.409) yet there is exception. Also where can I get the latest dlls of Plugins?

Thank You.

Hello any update on this?

[Daniel - PDF-XChange]

Hello, Anushka

I will have to ask for some patience, The Dev team was informed when your first post went up, but we have a very small team and they are quite busy at the moment. When they are able to reply, they will come back here.

Kind regards,