compare pdf documents using pdfxchange interface

[charuvasudev]

Hi,

I would like to use the pdfx UI for comparing two pdf files.

correction-I would like to compare two pdf files programmatically and show the compare window of PDFXedit. I will provide files programmatically, do compare operation and then show the result in the PDFXedit control as shown here- Pls see the attached screenshot-

pdfexchangeCompare.png

[Vasyl - PDF-XChange]

Hi charuvasudev .

The pseudocode:

Code: Select all

PXV_Inst inst;
...

IPXC_Document doc1 = inst.OpenDocumentFromFile("C:\\doc1.pdf", null);
IPXC_Document doc2 = inst.OpenDocumentFromFile("C:\\doc2.pdf", null);

IOperation op = inst.CreateOp(inst.Str2ID("op.compareDocs");

ICabNode inp = op.Params.Root["Input"];
inp.Add().v = doc1;
inp.Add().v = doc2;

ICabNode opt = op.Params.Root["Options"];

try
{
   op.Do();
}
catch { }

doc1.Close();
doc2.Close();
doc1 = null;
doc2 = null;

IPXC_Document cmpReportDoc;
if (otp.Count != 0)
    cmpReportDoc = (IPXC_Document)otp[0].v;

op = null;

if (cmpReportDoc != null)
     inst.OpenDocumentFrom(cmpReportDoc, null); // opens in UI

HTH

[charuvasudev]

Hi,

I tried to implement your code. But I am getting error- at
cmpReportDoc =opt(0).v

error is-
Unable to cast object of type 'System.Int32' to type 'PDFXEdit.IPXC_Document'.'

Here is my code-
Dim pxcInst As PDFXEdit.IPXC_Inst = CType(Inst1.GetExtension("PXC"), PDFXEdit.IPXC_Inst)
Dim doc1 As PDFXEdit.IPXC_Document = pxcInst.OpenDocumentFromFile(FileNames(0), Nothing)
Dim doc2 As PDFXEdit.IPXC_Document = pxcInst.OpenDocumentFromFile(FileNames(1), Nothing)
Dim op As IOperation = Inst1.CreateOp(Inst1.Str2ID("op.compareDocs"))
Dim inp As ICabNode = op.Params.Root("Input")
inp.Add().v = doc1
inp.Add().v = doc2
Dim opt As ICabNode = op.Params.Root("Options")

Try
op.Do()
Catch ex As Exception
MsgBox(ex.ToString)
End Try

doc1.Close()
doc2.Close()
doc1 = Nothing
doc2 = Nothing
Dim cmpReportDoc As IPXC_Document
If opt.Count <> 0 Then
cmpReportDoc = opt(0).v //this line throws error
End If
op = Nothing
If (cmpReportDoc IsNot Nothing) Then
pxcInst.OpenDocumentFrom(cmpReportDoc, Nothing) ' opens In UI
End If

End If

[MishaH]

Hi charuvasudev,

Unfortunately, there is a typo in one important line in the code sample provided by Vasyl.
The result of the operation is stored in the "Output" cab node, not in "Options".

So the correct way to retrieve the document is as follows:

Code: Select all

Dim output As ICabNode = op.Params.Root("Output")
If output.Count <> 0 Then
    cmpReportDoc = output(0).v
End If

Please let me know if this works for you.

Kind regards,
Misha

[charuvasudev]

issue solved

thank you

[Daniel - PDF-XChange]