Posted: Mon Oct 15, 2007 11:36 pm
bueno pues baje la clase y la compile, esta un poco confuso todo ya que no encontre documentacion muy explicita pero despues de un rato logre Mi Primer PDF!!!!!... aun me falta mucho por probar pero les doy la entrada de como mandar texto....
function creapdf()
opdf := tpdf():new('e:\mipdf.pdf')
opdf:Pdfnewpage("A4","P")
opdf:Pdfatsay("HOLA MUNDO!!!!!!!!!!!",800,10,.t.)
opdf:Pdfclosepage()
opdf:pdfclose()
return .t.
PD. Tube que agregar la siguiente funcion en mi PRG ya que me decia que no estaba al momento de compilar:
function filesize(cfile)
LOCAL nfiles := directory(cfile)
return nfiles[1,2]
Saludos desde Chihuahua,Mexico.
Alex.
Saludos
function creapdf()
opdf := tpdf():new('e:\mipdf.pdf')
opdf:Pdfnewpage("A4","P")
opdf:Pdfatsay("HOLA MUNDO!!!!!!!!!!!",800,10,.t.)
opdf:Pdfclosepage()
opdf:pdfclose()
return .t.
PD. Tube que agregar la siguiente funcion en mi PRG ya que me decia que no estaba al momento de compilar:
function filesize(cfile)
LOCAL nfiles := directory(cfile)
return nfiles[1,2]
Saludos desde Chihuahua,Mexico.
Alex.
Saludos
