On Thursday, September 15, 2011 at 6:37:04 PM UTC+8, Jayadev wrote:
> Dear Dwa Grosze,
>
> Please see your private mail, I have sent you a txt2pdf.prg which I
> generally use, you may have to modify it suitably to suit your environment.
>
> HTH,
>
> Warm regards,
>
> Jayadev
>
> "Dwa Grosze" <dwagr...@gmail.com> wrote in message
> news:56001dd5-5d23-4278...@h6g2000yqe.googlegroups.com...
> On 14 Wrz, 18:56, dlzc <dl...@cox.net> wrote:
> > On Sep 13, 5:27 pm, dlzc <dl...@cox.net> wrote:
> >
> > > Dear Dwa Grosze:
> >
> > > On Sep 13, 4:49 am, Dwa Grosze <dwagros...@gmail.com> wrote:
> > > ...
> >
> > > > The problem is as above. I searched all this group with
> > > > various keywords but didn't found any useful info. I'm
> > > > new to xHb, so maybe that's a reason too :) Some
> > > > discussion on coverting pdf to txt I found but none of
> > > > them says sth like this: yoy got a function ... and so on.
> > > > Is there any function in xHB to do this or I'll have to try
> > > > some other way?
> >
> > > How is the text file generated?
> >
> > I find the following methods exported in (an older copy of) PDFlib:
> > <QUOTE>
> > METHOD New( cFile, nLen, nHeigth, nWidth )
> > METHOD PdfNewPage( _cPageSize, _cPageOrient, _nLpi, _cFontName,
> > _nFontType, _nFontSize )
> > METHOD PdfClosePage()
> > METHOD PdfClose()
> > METHOD PdfPageSize( _cPageSize )
> > METHOD PdfPageOrient( _cPageOrient )
> > METHOD PdfSetLpi( _nLpi )
> > METHOD PdfSetFont( _cFont, _nType, _nSize, cId )
> > METHOD PdfDrawHeader()
> > METHOD PdfMargins( nTop, nLeft, nBottom )
> > METHOD PdfImageInfo( cFile )
> > METHOD PdfTiffInfo( cFile )
> >
> > METHOD Pdfjpeginfo( cFile )
> > METHOD Pdfimage( cFile, nRow, nCol, nHeight, nWidth, cId,
> > Scalex, Scaley )
> > METHOD Pdfatsay( cString, nRow, nCol, lExact, cId )
> > METHOD Pdfgetfontinfo( cParam )
> > METHOD Pdfpagenum( n )
> >
> > METHOD Getpagetype( nWidth, nHeight )
> > METHOD Settop( N ) INLINE ::aReport[ PDFTOP ] := N // top
> > METHOD Setleft( N ) INLINE ::aReport[ PDFLEFT ] := N // left &
> > right
> > METHOD Setbottom( N ) INLINE ::aReport[ PDFBOTTOM ] := N
> > METHOD Pdf_Rect( x, y, width, height )
> > METHOD Pdf_Stroke()
> > METHOD Setoverline( l )
> > METHOD Setunderline( l )
> > METHOD Pdfmoveto( X, Y )
> > METHOD Pdflineto( X, Y )
> > METHOD Pdfsetlinewidth( w )
> > METHOD Pdfsetlinecap( w )
> > METHOD Pdfsetdash( b, w )
> > METHOD Pdfsave( lBuf )
> > METHOD Pdfrestore( lBuf )
> > METHOD Pdfunder( Text, Len, X, Y )
> > METHOD Pdfover( Text, Len, x, y )
> > METHOD Pdf_Str_Width( Text, Len, Font, Size )
> > METHOD Pdfsetrgbcolor( R, G, B )
> > METHOD Pdfscale( X, Y, lBuf )
> > METHOD Pdftranslate( tX, tY )
> >
> > METHOD Pdfpnginfo( cFile )
> > METHOD Pdfrotate( pHi )
> > METHOD Pdfclosepath()
> > METHOD Pdfendpath()
> >
> > METHOD Pdfcurveto( x1, y1, x2, y2, x3, y3 )
> > METHOD Pdfcomplevel( x )
> > METHOD Pdfinfo( cTitle, cAuthor, cKey, cCreator )
> > METHOD PDF_setrgbcolor_fill( R, G, B )
> > <END QUOTE>
> >
> > ... so you might be able to generate the PDF with the formatting you
> > want, without making the text file first.
> >
> > David A. Smith
>
> Thank You for such a hugh part of knowledge! I hope it'll help me in
> my future xHB tasks. Now I just have to do something really simple. I
> got a flat text file with control chars/marks like CRLF, eject and
> EndOfFile and I just have to "save it as" pdf format. If *it* really
> needs wider study and usage of the library You've mentioned I'll got
> more work I thought in my most audacious presumptions...:(
>
> Thanks!
hi my dear brother can you send this prg file for me please i urgently need it