Un exemple de mon programme de test pour imprimer une liste de contact qui se nomme iTest.nxr.
Code : Tout sélectionner
Procedure ContactPrint()
If nxReport_LoadReport("iTest.nxr", @report) = #nxReport_OKAY
report\PreviewInNewWindow(0, 0, 800, 650, "Liste des contacts", #PB_Window_MinimizeGadget|#PB_Window_MaximizeGadget|#PB_Window_SizeGadget|#PB_Window_ScreenCentered, 0, $47420A, #nxReport_SHOWPRINTBUTTON|#nxReport_SHOWTHUMBNAILNAVIGATION|#nxReport_MAKEMODAL, RGB(213, 243, 206),120)
report\Destroy()
Else
MessageRequester("Information", "Erreur durant la procedure d'impression")
EndIf
nxReport_RemoveTemporaryFiles()
EndProcedure
Fil de discussion sur le forum anglais : http://www.purebasic.fr/english/viewtop ... ilit=pyrex