WIDGETS GAMBAS
LOGICIELS GAMBAS 3
TUTORIELS
VISITES

   visiteurs

   visiteurs en ligne

Où ça, qui ça?
Impression avec Gambas - Imprimer une Form
IMPRIMER LE CONTENU D'UNE FORM


Imprimer une form


(par taoteblues)


Créer un bouton pour l'impression de la feuille:


PUBLIC SUB Button9_Click()


'Imprimer une feuille


DIM imageWidth AS Integer

DIM imageHeight AS Integer

DIM mafeuille AS Picture

mafeuille = ME.Grab()


mafeuille = mafeuille.Image.Stretch(ME.W * 5, ME.H * 5).Picture

imageWidth = mafeuille.Width

imageHeight = mafeuille.Height




Draw.Begin(PRINTER)


'impression centrée

Draw.Picture(mafeuille, (Printer.Width - imageWidth) / 2, (Printer.Height - imageHeight) / 2)



Draw.End


END


Remarque :
La copie dans le presse papier du form se fait par la commande GRAB
L'envoi sur l'imprimante se fait par la commande DRAW.PICTURE sur le PRINTER

Date de création : 19/10/2009 @ 16:33
Dernière modification : 19/10/2009 @ 16:33
Catégorie : Impression avec Gambas
Page lue 3610 fois


Imprimer l'article Imprimer l'article


react.gifRéactions à cet article

Personne n'a encore laissé de commentaire.
Soyez donc le premier !


ACCES RAPIDE
RECHERCHE




LOGICIELS GAMBAS 2
LES INSTRUCTIONS
LES COMPOSANTS
Divers

^ Haut ^