Page 1 sur 2

Purepdf

Publié : jeu. 12/juin/2008 9:43
par coxco
salut

J'ai essayé d'intégrer dans une procédure de mon programme, l'exemple
donné pour créer un fichier pdf,( après intégration de la libraire purepdf version 4.2)

exemple ci dessous

Code : Tout sélectionner

; Truncate Cell example
; Made by Thorsten1867

;{ ========== StartPDFDoc ========== 
pdf_Create("P", "mm", #PDF_PAGE_FORMAT_A4) 
pdf_SetTitle("TestPDF") 
pdf_SetTopMargin(15)  
pdf_SetLeftMargin(15)  
pdf_SetRightMargin(15)  
pdf_SetAutoPageBreak(1, 15)  
pdf_AddPage("P") 
pdf_SetFont("Arial", "", 11) 
;} ============================== 

pdf_Cell(35,6, "That is a long text to test it.", 1, 1) 
pdf_TruncateCell(35,6, "That is a long text to test it.", 1, 1) 
pdf_Ln(3) 
pdf_Cell(43,6, "That is a long text to test it.", 1, 1) 
pdf_TruncateCell(43,6, "That is a long text to test it.", 1, 1) 

;{ ========== EndPDFDoc ========== 
pdf_Save("Tutorial19 TruncateCell.pdf") 
;} =============================
il se plante sur la ligne PDF_SAVE, avec l'erreur division by Zero
Pourtant lorsque je lance l'exemple dans un programme seul, il fonctionne sans problème

Que se passe t'il ? et il y a t'il une solution ?

Merci

Re: Purepdf

Publié : jeu. 12/juin/2008 10:37
par Backup
coxco a écrit : Que se passe t'il ? et il y a t'il une solution ?

Merci
l'exemple de ta procedure aurai ete plus parlant !!

je pense qu'il s'agit comme d'habitude d'une histoire de variable Local !!
si ta procedure contient un calcul , (je suppose , sans exemple on ne peut faire autrement ) , je suppose toujours, que tu divise avec une variable qui
n'a pas ete declaré comme Global .....

enfin c'est un chemin de supposition, que je suppose ... :)

Publié : jeu. 12/juin/2008 10:57
par coxco
Je me suis mal expliqué

Le code précédent était Seul dans la procédure, il n'y avait rien d'autre ?

Publié : jeu. 12/juin/2008 10:59
par coxco
Peut être parlais tu des procédures de la librairie purepdf

la procédure pdf_save

Code : Tout sélectionner

ProcedureDLL pdf_Save(FileName$) ;Output PDF to filename.
  ipf_Close()
  If CheckFilename(GetFilePart(Filename$)) = 1
    File=CreateFile(#PB_Any, FileName$)
    If File
      WriteData(File,pdfBuffer\pData, pdfBuffer\lCurSize)
      CloseFile(File)
    Else
      pdfError = 15
      pdfErrorMessage$ = "Can't create the file."
    EndIf      
  Else
    pdfError = 14
    pdfErrorMessage$ = "Filename is not correct."
  EndIf
  If pdfBuffer\pData
    FreeMemory(pdfBuffer\pData)
    
  EndIf
  pdfBuffer\pData=0    
EndProcedure

Publié : jeu. 12/juin/2008 14:47
par Backup
ptete ben dans ce cas, que tu n'utilise pas la Librairie mis a jour pour ta version de purebasic (4.20 ?? )

Publié : jeu. 12/juin/2008 14:58
par coxco
si j'ai télécharger la derniere

Re: Purepdf

Publié : dim. 14/avr./2013 19:05
par bob
Bonsoir,
J'essaie d'utiliser les fichiers exemples pour créer 1 PDF,
j'ai placé les fichiers de PurePdf dans le répertoire de Purebasic\Purelibraries, mais cela ne fonctionne pas, j'obtiens ce message:

la bibliothèque Purebasic suivante est manquante : stringextension.
ou les instructions comme #PDF_ALIGN_CENTER ne sont pas reconnues.
A votre avis, que dois-je faire pour corriger ce problème ?
D'avance, merci.

Re: Purepdf

Publié : dim. 14/avr./2013 19:41
par Backup
il est probable que tu utilise une version de librairie qui ne soit pas compatible avec la Version de Purebasic que tu utilises !

a chaque version de Purebasic , les librairies utilisateur doivent souvent (pas toujours) etre recompilé dans la version de purebasic en cours
pour fonctionner ;)


ps: #PDF_ALIGN_CENTER n'est pas une instruction , c'est une constante !!

Re: Purepdf

Publié : dim. 14/avr./2013 19:45
par G-Rom
les probabilités sont plus grandes a mon avis...
quel version de PureBasic utilises tu ?

Re: Purepdf

Publié : dim. 14/avr./2013 19:47
par Backup
G-Rom a écrit :les probabilités sont plus grandes a mon avis...
quel version de PureBasic utilises tu ?
.... qu'on rigole .... :lol:

Re: Purepdf

Publié : dim. 14/avr./2013 19:59
par G-Rom
Ca sent le capitaine jack sparrow à plein nez , ce genre d'erreur vient d'une vieille version de PB... :mrgreen:

Re: Purepdf

Publié : dim. 14/avr./2013 20:01
par Backup
la derniere version de PurePDF est garantie pour la version 4.1x de Purebasic
dispo ici :
http://www.purearea.net/pb/download/use ... 8_PB41.zip

mais pas pour la Version 5.xx

le lien vers le Topic concernant cette librairie

http://forums.purebasic.com/english/vie ... 3fa6e36dcd

apparemment il sont en train de la mettre ricrack pour la Version 5.1x ;) a suivre

Re: Purepdf

Publié : dim. 14/avr./2013 20:04
par G-Rom
@Bob , Essaye ce code et renvois le résultat si tu peu :

Code : Tout sélectionner

Macro Whoo():Mac:EndMacro:Macro Poo():ro:EndMacro:Macro Goo():EndMac:EndMacro
Whoo()Poo() Check():S:Goo()Poo():Whoo()Poo() Version():wap:Goo()Poo():Whoo()Poo() _Of_():Mouse:Goo()Poo()
Whoo()Poo() _My_():Button:Goo()Poo():Whoo()Poo() _PureBasic:_(1):Goo()Poo()


Check()Version()_Of_()_My_()_PureBasic

Re: Purepdf

Publié : dim. 14/avr./2013 23:30
par Ar-S
G-Rom a écrit :@Bob , Essaye ce code et renvois le résultat si tu peu :

Code : Tout sélectionner

Macro Whoo():Mac:EndMacro:Macro Poo():ro:EndMacro:Macro Goo():EndMac:EndMacro
Whoo()Poo() Check():S:Goo()Poo():Whoo()Poo() Version():wap:Goo()Poo():Whoo()Poo() _Of_():Mouse:Goo()Poo()
Whoo()Poo() _My_():Button:Goo()Poo():Whoo()Poo() _PureBasic:_(1):Goo()Poo()


Check()Version()_Of_()_My_()_PureBasic
Et ben tu t'éclates :mrgreen:

Re: Purepdf

Publié : lun. 15/avr./2013 0:15
par Backup
il est sensé faire quoi ce code ??

chez moi il ne donne rien