Hi,
I'm looking for a way to convert from pdf to jpg and viceversa.
An alternative to pdf creator
many thanks
info@marcoboschi.it
Hi,
I'm looking for a way to convert from pdf to jpg and viceversa.
An alternative to pdf creator
many thanks

Uwe,
Thank you
marco
Uwe,
Can you offer me convert pdf to rtf file in commandline. ?
Thanks
function pdftest()
******************************************************************
local oStatic1,oBitmap,nPageID,nPages,abuffer := {}
//TQuickPdf():Register(QUICKPDF_KEY) // wird beim Programmstart nur einmal gemacht !!!
cFile := "laststrokes.pdf"
WITH OBJECT ( oPdf := TQuickPdf():New() )
nPageID := .:LoadFromFile(cFile)
nPages := .:PageCount()
for x := 1 to nPages
aadd(aBuffer,substr(.:RenderPagetoString(96,x,0),15))
next x
.:Destroy()
END WITH
@ 0,0 DCSTATIC TYPE XBPSTATIC_TYPE_RECESSEDBOX SIZE 100,50 OBJECT oStatic1
oBitmap := xbpBitmap():new():create()
oBitmap:setbuffer(aBuffer[1]) // nur erste Seite für Test
@ .1,.1 DCSTATIC TYPE XBPSTATIC_TYPE_BITMAP SIZE 100,50 CAPTION oBitmap OBJECT oBitmap1 PARENT oStatic1
dcread gui fit
return nilMarcoBoschi wrote:Hi,
I'm looking for a way to convert from pdf to jpg and viceversa.
An alternative to pdf creator
many thanks
oPdf := FWPDF():New( cNewPdfFile )
oJpgBuf := MemoRead( <jpegfile> )
oPdf:nPage := 1
oPdf:WritePage( oJpgBuf )
oPdf:Close()Hello,
I tested latest preview posted by Master Antonio at FiveDbu, and the pdfs generated by native FWH are too big in size (one page, almost 4 mb).
I don´t have Office 2007.
Also, if I try to generate a pdf > 100 pages, it produces an hb_out.log at Harbour.
Also, if I try to generate a pdf > 100 pages, it produces an hb_out.log at Harbour.
Application Internal Error - C:\Users\Elvira\Desktop\0956_2013\fivedbu_20130909\fivedbu.exe
Terminated at: 2013.09.17 12:25:20
Unrecoverable error 9006: hb_xgrab can't allocate memory
Called from DIBTOSTR(0)
Called from EMF2JPEG(76) in .\source\function\PRV2PDF.PRG
Called from FWPDF:ADDMETA(141) in .\source\function\PRV2PDF.PRG
Called from (b)FWSAVEPREVIEWTOPDF(38) in .\source\function\PRV2PDF.PRG
Called from AEVAL(0)
Called from FWSAVEPREVIEWTOPDF(38) in .\source\function\PRV2PDF.PRG
Called from (b)TPREVIEW_BUILDBUTTONBAR(342) in .\source\classes\RPREVIEW.PRG
Called from TBTNBMP:CLICK(471) in .\source\classes\BTNBMP.PRG
Called from TBTNBMP:LBUTTONUP(662) in .\source\classes\BTNBMP.PRG
Called from TCONTROL:HANDLEEVENT(1719) in .\source\classes\CONTROL.PRG
Called from TBTNBMP:HANDLEEVENT(1465) in .\source\classes\BTNBMP.PRG
Called from _FWH(3183) in .\source\classes\WINDOW.PRG
Called from SYSREFRESH(0)
Called from STOPUNTIL(60) in .\source\function\MSGRUN.PRG
Called from TPREVIEW:ACTIVATE(143) in .\source\classes\RPREVIEW.PRG
Called from RPREVIEW(1759) in .\source\classes\RPREVIEW.PRG
Called from (b)TREPORT_NEW(170) in .\source\classes\REPORT.PRG
Called from TREPORT:ACTIVATE(850) in .\source\classes\REPORT.PRG
Called from TXBROWSE:REPORT(7132) in .\source\classes\XBROWSE.PRG
Called from (b)OPEN(290) in C:\fwteam\samples\fivedbu.prg
Called from TBTNBMP:CLICK(471) in .\source\classes\BTNBMP.PRG
Called from TBTNBMP:LBUTTONUP(662) in .\source\classes\BTNBMP.PRG
Called from TCONTROL:HANDLEEVENT(1719) in .\source\classes\CONTROL.PRG
Called from TBTNBMP:HANDLEEVENT(1465) in .\source\classes\BTNBMP.PRG
Called from _FWH(3183) in .\source\classes\WINDOW.PRG
Called from WINRUN(0)
Called from TMDIFRAME:ACTIVATE(996) in .\source\classes\WINDOW.PRG
Called from MAIN(57) in C:\fwteam\samples\fivedbu.prg
------------------------------------------------------------------------HB_FUNC( DIBTOSTR ) Â // ( hDib ) --> lSuccess
{
  long lSize;
  char * pDib;
  #ifndef _WIN64
   pDib = DibToStr( ( HGLOBAL ) hb_parnl( 1 ), &lSize );
  #else Â
   pDib = DibToStr( ( HGLOBAL ) hb_parnll( 1 ), &lSize );
  #endif
  hb_retclen( pDib, lSize );
  hb_xfree( ( void * ) pDib );  // Here !!!
}Antonio,
Are not others ways to create FWH PDFs without Office, and without this enormous capacity needed for one page, 4 mb ?
I use a virtual printer named PDFill Pdf Writer, who produce my pdf manuals, with for example 707 pages for only 9307 ko.
Inside there is a lot of png images of my soft. This product work perfect, i use it since a long time.
If you want to see, the manual is here : http://www.icim.fr/pdf/icim_facturation ... erence.pdf
I think it would be good if the users of my softs could print directly on pdf without virtual printer.
It is the only reason who do me change and let down PDFill Pdf Writer, because it is the better product
than i know to make PDFs with no limited numbers of pages, in a extraordinary little file size.
Badara,
you have 3 possibilities to create a pdf file.
1: using word (if installed)
2: using an printer driver that creates pdf.
3: you can use HaruPdf lib that comes with (x)harbour. With this lib you can create pdf directly from your app. There is good sample in the contrib folder of (x)harbour.