Imprimer sous Linux Ubuntu
Publié : sam. 13/déc./2008 12:57
Bonjour,
J'aimerais pouvoir imprimer simplement des graphiques avec PureBasic sous Linux Ubuntu, mais les commandes Printer de la démo ci-dessous fonctionne pas sous Linux !
Si il faut utiliser une autre procédure, un membre du forum pourrait-il m'expliquer la conversion et le code qu'il faudrait faire avec l'exemple ci-desous.
Merci d'avance
;
; ------------------------------------------------------------
;
; PureBasic - Printer example file
;
; (c) Fantaisie Software
;
; ------------------------------------------------------------
;
If PrintRequester()
If StartPrinting("PureBasic Test")
LoadFont(0, "Arial", 30)
LoadFont(1, "Arial", 100)
If StartDrawing(PrinterOutput())
DrawingFont(FontID(0))
DrawText(100, 100, "PureBasic Printer Test")
DrawingFont(FontID(1))
DrawText(100, 400, "PureBasic Printer Test 2")
If LoadImage(0, "Data\PureBasic.bmp")
DrawImage(ImageID(0), 200, 600)
Else
MessageRequester("Error","Can't load the image")
EndIf
FrontColor(RGB(100,100,100))
Box(200, 600, 100, 100)
StopDrawing()
EndIf
StopPrinting()
EndIf
EndIf
[/list][/code]
J'aimerais pouvoir imprimer simplement des graphiques avec PureBasic sous Linux Ubuntu, mais les commandes Printer de la démo ci-dessous fonctionne pas sous Linux !
Si il faut utiliser une autre procédure, un membre du forum pourrait-il m'expliquer la conversion et le code qu'il faudrait faire avec l'exemple ci-desous.
Merci d'avance
;
; ------------------------------------------------------------
;
; PureBasic - Printer example file
;
; (c) Fantaisie Software
;
; ------------------------------------------------------------
;
If PrintRequester()
If StartPrinting("PureBasic Test")
LoadFont(0, "Arial", 30)
LoadFont(1, "Arial", 100)
If StartDrawing(PrinterOutput())
DrawingFont(FontID(0))
DrawText(100, 100, "PureBasic Printer Test")
DrawingFont(FontID(1))
DrawText(100, 400, "PureBasic Printer Test 2")
If LoadImage(0, "Data\PureBasic.bmp")
DrawImage(ImageID(0), 200, 600)
Else
MessageRequester("Error","Can't load the image")
EndIf
FrontColor(RGB(100,100,100))
Box(200, 600, 100, 100)
StopDrawing()
EndIf
StopPrinting()
EndIf
EndIf
[/list][/code]