PowerBuilder Requires Chilkat v11.7.0+

Extract Right-to-Left (Hebrew, Arabic) Text in Logical Order

See more PDF Text Extraction Examples

Demonstrates the "bidi" clean-up option. PDFs draw right-to-left text in visual order (the order of the glyphs on the page); by default the extracted text is reordered into logical order, so that it reads and compares correctly. Set "bidi" to false to get the glyphs in the order they are drawn. PowerBuilder

integer li_rc
long li_Success
oleobject loo_Pdf
oleobject loo_Json
oleobject loo_JsonOut

li_Success = 0

//  This example requires the Chilkat API to have been previously unlocked.
//  See Global Unlock Sample for sample code.

//  The PDF used in this example is available at hebrew_line.pdf

loo_Pdf = create oleobject
li_rc = loo_Pdf.ConnectToNewObject("Chilkat.Pdf")
if li_rc < 0 then
    destroy loo_Pdf
    MessageBox("Error","Connecting to COM object failed")
    return
end if
li_Success = loo_Pdf.LoadFile("qa_data/pdf/hebrew_line.pdf")
if li_Success = 0 then
    Write-Debug loo_Pdf.LastErrorText
    destroy loo_Pdf
    return
end if

loo_Json = create oleobject
li_rc = loo_Json.ConnectToNewObject("Chilkat.JsonObject")

loo_JsonOut = create oleobject
li_rc = loo_JsonOut.ConnectToNewObject("Chilkat.JsonObject")

//  The page has a line of Hebrew with a Latin word (PDF) and a number (2026) embedded in it.
//  In logical order the line reads: kovetz PDF mishnat 2026 muchan ("the PDF file from 2026 is ready"),
//  with the Hebrew words in reading order and "PDF" and "2026" kept left to right.
li_Success = loo_Pdf.ExtractText("text",loo_Json,loo_JsonOut)
if li_Success = 0 then
    Write-Debug loo_Pdf.LastErrorText
    destroy loo_Pdf
    destroy loo_Json
    destroy loo_JsonOut
    return
end if

Write-Debug "---- default (bidi: true, logical order) ----"
Write-Debug loo_JsonOut.StringOf("text")

//  Without reordering, the Hebrew words come out reversed and in the opposite order, as drawn.
loo_Json.UpdateBool("bidi",0)
li_Success = loo_Pdf.ExtractText("text",loo_Json,loo_JsonOut)
if li_Success = 0 then
    Write-Debug loo_Pdf.LastErrorText
    destroy loo_Pdf
    destroy loo_Json
    destroy loo_JsonOut
    return
end if

Write-Debug "---- bidi: false (as drawn) ----"
Write-Debug loo_JsonOut.StringOf("text")

//  Sample output (the Hebrew is shown here transliterated):

//  ---- default (bidi: true, logical order) ----
//  Right-to-Left Text
//  
//  The line below is Hebrew with a Latin word and a number embedded in it:
//  
//  kovetz PDF mishnat 2026 muchan
//  ---- bidi: false (as drawn) ----
//  Right-to-Left Text
//  
//  The line below is Hebrew with a Latin word and a number embedded in it:
//  
//  nachum 2026 tanshim PDF ztevok    (the words in reverse order, each Hebrew word with its letters reversed)


destroy loo_Pdf
destroy loo_Json
destroy loo_JsonOut