Gambas France BETA


Pas de compte ? Incription

Methode d'impression

Ce sujet est résolu.

1
AuteurMessages
DIM900#1 Posté le 14/11/2013 à 15:42:04
Bonjour a tous,

Je suis en train de voir la partie des impressions.. Et j'ai quelque petit problème..

Voici mon code
Public Sub _new()

End

Public Sub Form_Open()
Me.Center
End

Public Sub ButtonPrint_Click()

Dim pPrinter As New Printer As "pPrinter"

pPrinter.Paper = Printer.Custom
pPrinter.PaperHeight = 15
pPrinter.PaperWidth = 10.80
pPrinter.Name = "Intermec-PF4i(203)FP"
pPrinter.Orientation = Printer.Portrait
pPrinter.Print

End

Public Sub pPrinter_begin()

TextBox1.Text = "Impréssion en cours"
application.Busy = 1

End

Public Sub pPrinter_Draw()

Dim pObjet As New Picture(10.80, 15, True)

Paint.Begin(pObjet)
Paint.Brush = Paint.LinearGradient(0, 0, 10, 10, [0, 10], [0, 1])
Paint.Text("Test OK", 5, 5, 10, 5, align.Left)
Paint.Fill
Paint.End

End

Public Sub pPrinter_End()

TextBox2.Text = "Fin de l'impression"
application.Busy = 0

End



Dit moi si je fais une gourde quelque part.. Car l'édition est toujours blanche..
J'ai du mal à comprendre..
Je voudrai une gambas grillée ;) :lol!:
Merci :cheers: :lol!:
linuxos#2 Posté le 15/11/2013 à 03:23:19
Un peu de sel, de poivre et la crevette sera... Salut Dim,

Je pense que l'erreur est ici, enfin c'est a tester:

Paint.Begin(pObjet) => A supprimer
Paint.End => A supprimer

Un evenement _Draw() n'a pas besoin de .Begin() ni de .End car c'est explicite.

En consequence il faut changer le code, et ajouter une fonction pour créer ton objet Picture avant et dans l'evenement Draw, juste dessiner cet objet Picture.

Voila, j'espere avoir été pas trop brouillon.
Olivier
Lorsqu'on s'occupe d'informatique, il faut faire comme les canards... Paraître calme en surface et pédaler comme un forcené par en dessous.
DIM900#3 Posté le 15/11/2013 à 08:48:32
Ok je teste Lunixos et je te tien au courant..
Je voudrai une gambas grillée ;) :lol!:
Merci :cheers: :lol!:
gambix#4 Posté le 16/11/2013 à 13:34:09
Faire simple !C'est que la ton code est bizzard

Dans Printer_Draw paint est déja initialisé avec le device printer. Donc tout ce que tu dessine va vers l'imprimante.

Dans ton cas tu ne dessine plus sur l'imprimante mais dans un picture.

Bon aujourd'hui je m'attele au probleme de taille custom. J'ai déja corrigé l'indexation et revu l'arrangement verticale.
Moins de texte dans une signature c'est agrandir son espace.
DIM900#5 Posté le 24/11/2013 à 14:50:59
Hello

J'ai compris le principe..

Je croyais qu'il fallait dessiner son dessin dans un picture, avant de l'envoyer à l'imprimante..

Je vu avec mes testes que sans l'objet picture ca fonctionne..
Par contre j'ai une question, peux t on générer un événement _error ??
Je voudrai une gambas grillée ;) :lol!:
Merci :cheers: :lol!:
gambix#6 Posté le 24/11/2013 à 16:03:43
Faire simple !c'est a dire ?
Moins de texte dans une signature c'est agrandir son espace.
linuxos#7 Posté le 24/11/2013 à 16:33:07
Un peu de sel, de poivre et la crevette sera... Salut Dim,

Non il n'y pas d'événement _Error sur ce type d'objet: PRINTER

Il faut considerer que l'impression que tu envois ne va pas directement a l'imprimante, elle est envoyé au spooler d'impression de ta machine (service cups généralement).
Donc si il y a une erreur lors de la tentative de communication avec l'imprimante, l'erreur sera dans le spooler d'impression.
Une fois que l'impression est envoyé au spooler d'impression, pour la partie Gambas, c'est terminé, il ne s'en occupe pas.
Voici la doc de l'objet PRINTER: http://gambasdoc.org/help/comp/gb.qt4/printer?v3

Olivier
Lorsqu'on s'occupe d'informatique, il faut faire comme les canards... Paraître calme en surface et pédaler comme un forcené par en dessous.
Reivillo#8 Posté le 24/11/2013 à 16:53:50
C' est ici, et nul part ailleurs. « Et pis c'est tout ! »Bonsoir DIM900.

Pour mettre du Code sur le Forum,
clique sur la Tête de la Gambas,
et colle ton Code entre les deux balises.
Comme ci-dessous:

et ça donnera ceci:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
PUBLIC SUB _new()

END

PUBLIC SUB Form_Open()
ME.Center
END

PUBLIC SUB ButtonPrint_Click()

DIM pPrinter AS NEW Printer AS "pPrinter"

pPrinter.Paper = Printer.Custom
pPrinter.PaperHeight = 15
pPrinter.PaperWidth = 10.80
pPrinter.Name = "Intermec-PF4i(203)FP"
pPrinter.Orientation = Printer.Portrait
pPrinter.Print

END

PUBLIC SUB pPrinter_begin()

TextBox1.Text = "Impréssion en cours"
application.Busy = 1

END

PUBLIC SUB pPrinter_Draw()

DIM pObjet AS NEW Picture(10.80, 15, TRUE)

Paint.Begin(pObjet)
Paint.Brush = Paint.LinearGradient(0, 0, 10, 10, [0, 10], [0, 1])
Paint.Text("Test OK", 5, 5, 10, 5, align.Left)
Paint.Fill
Paint.End

END

PUBLIC SUB pPrinter_End()

TextBox2.Text = "Fin de l'impression"
application.Busy = 0

END

Plus sympa non?

Reivillo.
Version LinuxMint 13 (1.6.1-1+maya-mate(32-bit)) LTS Noyau 3.14.33-031433-generic (27-02-2015)
LinuxMint 13 Mate Fr ICI, LinuxMint 17 Mate Fr .
Programmation Gambas3 Installé depuis la Console Terminal avec successivement: Les 3 Lignes sudo en Gras ci-dessous...
sudo add-apt-repository ppa:gambas-team/gambas3
sudo apt-get update
sudo apt-get install gambas3 -y
Gambas3.8.4-57.47 (Mise à Jour Auto via mintupdate le 28-01-2016)
Pour la Doc, c'est vers là: Documentation Gambas3 FR
DIM900#9 Posté le 28/11/2013 à 20:02:43
Bonsoir Reivillo

Merci de l info.
Je voudrai une gambas grillée ;) :lol!:
Merci :cheers: :lol!:
Reivillo#10 Posté le 28/11/2013 à 20:13:09
C' est ici, et nul part ailleurs. « Et pis c'est tout ! »Bonsoir DIM900.

Merci, pour le Retour.

Reivillo.
Version LinuxMint 13 (1.6.1-1+maya-mate(32-bit)) LTS Noyau 3.14.33-031433-generic (27-02-2015)
LinuxMint 13 Mate Fr ICI, LinuxMint 17 Mate Fr .
Programmation Gambas3 Installé depuis la Console Terminal avec successivement: Les 3 Lignes sudo en Gras ci-dessous...
sudo add-apt-repository ppa:gambas-team/gambas3
sudo apt-get update
sudo apt-get install gambas3 -y
Gambas3.8.4-57.47 (Mise à Jour Auto via mintupdate le 28-01-2016)
Pour la Doc, c'est vers là: Documentation Gambas3 FR
1