Re: PDFSplitMerge - wierd !

Hi Al,

This works too, both as a prg and as an exe:

oForm = NewObject("FrmReport")
oForm.Visible = .T.
oForm.cntSend.Open
Read Events

Define Class FrmReport As Form
Add Object cntSend As Container With ;
oSplitMerge = Null ,;
Visible = .F.
Procedure cntSend.Open
This.oSplitMerge = CreateObject("PDFSplitMerge.PDFSplitMerge.1")
Cd "C:\DISTRIB\ASIC Forms\ASIC Lite PDF Old"
lnFiles = ADir(laPDFs,"*.pdf")
lcInput=""
For i = 1 to lnFiles
lcInput = lcInput + laPDFs(i,1) + "|"
Next
lcInput = Rtrim(lcInput,1,"|")
This.oSplitMerge.Merge(lcInput,"merged.pdf")
EndProc
Procedure cntSend.Destroy
This.oSplitMerge = Null
EndProc
Procedure Unload
Clear Events
EndProc
EndDefine

-Roger


"Al Marino" <almarino_AT_intelliform.net> wrote in message
news:uEP3Lh$7HHA.3916@xxxxxxxxxxxxxxxxxxxxxxx
Hi Roger
Thanks for taking the time

It also works for me on any button on the form
However, not in any code in the Frmrpt.cntReport.method

I doubt it is the framework since cntReport is itself merely a container for the different
functions
but I am going to test this with a simple class container (no code) and simple form
should have time to do tomorrow

al


"Roger Ansell" <notmy@xxxxxxxxxxxxxxxxxxxx> wrote in message
news:uwSDjl07HHA.1208@xxxxxxxxxxxxxxxxxxxxxxx
Just tried it on a plain vanilla form with a property
called oPDFSplit. CommandButton on the form click event
This.oPDFSplit = CreateObject("PDFSplitMerge.PDFSplitMerge.1")

In development mode I can click the button any number
of times without error and checking the debugger,
the PDFSplitMerge object was created.

Created an exe and ran that from Windows Explorer ...
again no problems encountered at all.

Sounds like your framework is the problem.
Have you got any access/assign methods or event binding
on your oSplitMerge property that could possibly interfere?

-Roger


"Al Marino" <almarino_AT_intelliform.net> wrote in message
news:eRWs37z7HHA.3900@xxxxxxxxxxxxxxxxxxxxxxx
Hi All

I have been out of town, so I have started a new thread

My previous post said:
<<We just purchased PDFSplitMerge from Guangmingsoft
It is a set of dll's that work fine in development
Does not work in runtime (vfp9, sp1)
Fails on createobject>>

on further testing, this is not correct !
our framework has classes: cntSend, and Frmrpt that are used here
Frmrpt class has cntSend as member, cntSend handles report, email, fpt, etc thru contained
classes cntMapi etc

situation 1:
method cntSend.open tries to:
This.oSplitMerge = createobjec("PDFSplitMerge.PDFSplitMerge.1")

in development, this works once !!
on 2nd attempt, fails (restarting vfp => once again)
in runtime, always fails

situation 2
Frmrpt button has code:
oObj = createobjec("PDFSplitMerge.PDFSplitMerge.1")

this works always in development and runtime !!

anybody have any idea what is going on ?

al
ps. for anybody who is interested, when this works it is very fast, combines 50 reports into one
pdf over 10 MB in about 1 second !












.

Loading