Massimo
Try
Function Main()
Local hThread := hb_threadStart( {|| MyCrystalViewer() } )
do while .t.
if inkey() == 27
exit
endif
enddo
hb_threadJoin( hThread )
Return nil
Function MyCrystalViewer()
LOCAL oCrystal := CREATEOBJECT( "CrystalRuntime.Application
-Messaggio Originale-
Da: "Massimo Belgrano" <[EMAIL PROTECTED]>
A: "Harbour Project Main Developer List."
Data invio: mercoledì 3 dicembre 2008 16.31
Oggetto: Re: [Harbour] Harbour and crystal report
any chance using gtwvg?
I don't know.
EMG
--
E
any chance using gtwvg?
2008/12/3 Enrico Maria Giordano <[EMAIL PROTECTED]>
>
> -Messaggio Originale- Da: "Massimo Belgrano" <[EMAIL PROTECTED]
> >
> A: "Harbour Project Main Developer List."
> Data invio: mercoledì 3 dicembre 2008 11.
-Messaggio Originale-
Da: "Massimo Belgrano" <[EMAIL PROTECTED]>
A: "Harbour Project Main Developer List."
Data invio: mercoledì 3 dicembre 2008 11.17
Oggetto: Re: [Harbour] Harbour and crystal report
Is aivable a way for use crystal report 2008?
This
21 novembre 2007 16.28
> Oggetto: Re: [Harbour] Harbour and crystal report
>
>
> > An example
> >
> > oCrystal := TOleAuto():New( "Crystal.CRPE.Application" )
> > oCRReport := oCrystal:OpenReport( ".\impagen.rpt" )
> > oCRReport:Preview
