cs_aurbadguy
Messages postés29Date d'inscriptionlundi 8 mars 2004StatutMembreDernière intervention30 mai 2004
-
14 avril 2004 à 14:20
cs_aurbadguy
Messages postés29Date d'inscriptionlundi 8 mars 2004StatutMembreDernière intervention30 mai 2004
-
14 avril 2004 à 14:40
en gros je sauvegarde un graphique(MSChart1) sous format .bmp,
je le charge,
et je l'imprime,
voila le code que j'utilise :
MSChart1.EditCopy
chemingraph = App.Path & "" & strFileName & ".bmp"
'creation d'un fichier temporaire
Call SavePicture(Clipboard.GetData, App.Path & "" & strFileName & ".bmp")
Printer.Orientation = vbPRORLandscape
Printer.PaperSize = 9
Printer.ColorMode = vbPRCMColor
Set MonImage = LoadPicture(chemingraph) ' chargement du fichier temporaire
Printer.ScaleMode = vbMillimeters
'vbMillimeters = Coordonées en mm
'impression de picture1 à 45mm en partant de la gauche de feuille et
' 50mm en partant du haut sur (100mm de large et 150 de haut)
Printer.PaintPicture MonImage, 10, 10, 250, 170
Printer.EndDoc
cs_aurbadguy
Messages postés29Date d'inscriptionlundi 8 mars 2004StatutMembreDernière intervention30 mai 2004 14 avril 2004 à 14:22
le problème et que je sature une imprimante epson 2050 qui a 16mo de mémoire avec un bmp qui fait 1.56mo !
et sinon ca passe sur un copieur ( genre grosse imprimante de fou.. avec plus de mémoire surement )