OVH Cloud OVH Cloud

Imprimer vers un tracer

1 réponse
Avatar
Christophe
Bonjour,
J'ai créer une petite application graphique avec les API de dessin. Ainsi
j'envoi le graphisme sur l'écran ou le printer (Hdc/hwdc).
Mais pas moyen d'imprimer au format supérieur à l'A3 ! En effet l'object
Printer ne connais qu'au maximum le .PAPERSIZE = ..A3.
J'ai tenté avec des lacunes d'utiliser cela pour imprimer en A2:

Printer.ScaleMode = vbPixels
Printer.Orientation = vbPRORLandscape
Printer.PaperSize = vbPRPSUser
Printer.ScaleY(420, vbMillimeters, vbPixels)
Printer.ScaleX(594, vbMillimeters, vbPixels)

Malheusement il semble y avoir un problème... ca ne fonctionne pas.
Et je n'ai rien trouvé sur internet ou quelqu'un avez une solution/astuce
ou même une ActiveX se chargeant d'exploiter les traceurs.

Quelq'un a une piste ?
Par avance... un grand merci

1 réponse

Avatar
Arnaud PICHON
Bonjour,
J'ai sensiblement le même problème, je veux savoir quel est le code d'un
format dont je connais le libellé. Mon traceur accepte le format "ISO A0 -
841 x 118.8 mm", je veux forcer ce format à l'impression, mais je n'arrive
pas à retrouver le code qui est associé à ce format pour renseigner la
propriété PaperSize.
Avez vous des idées

"Christophe" wrote:

Bonjour,
J'ai créer une petite application graphique avec les API de dessin. Ainsi
j'envoi le graphisme sur l'écran ou le printer (Hdc/hwdc).
Mais pas moyen d'imprimer au format supérieur à l'A3 ! En effet l'object
Printer ne connais qu'au maximum le .PAPERSIZE = ..A3.
J'ai tenté avec des lacunes d'utiliser cela pour imprimer en A2:

Printer.ScaleMode = vbPixels
Printer.Orientation = vbPRORLandscape
Printer.PaperSize = vbPRPSUser
Printer.ScaleY(420, vbMillimeters, vbPixels)
Printer.ScaleX(594, vbMillimeters, vbPixels)

Malheusement il semble y avoir un problème... ca ne fonctionne pas.
Et je n'ai rien trouvé sur internet ou quelqu'un avez une solution/astuce
ou même une ActiveX se chargeant d'exploiter les traceurs.

Quelq'un a une piste ?
Par avance... un grand merci