Discussion :

[zidenne]

salut:
j'ai un imprimente fargo 820 pour l'impression des carte plastique .il peut imprimer en recto verso automatiquement puisque il renverse les cartes lui meme. pour le commander j'ai utiliser un code d'impression [printer] mais quand j'active l'impression en recto/verso il imprime le recto de la document dans une carte et le verso dans une autre .
es qu'il y a une méthode ou un code à ajouter pour que l'imprimente imprime les deux documents dans une seule carte et il renverce la carte lui meme.
merci

[Droïde Système7]

Bonjour,

As-tu été voir dans le pilote les possibilités (propriétés) de ta printeuse ?

Mais si c'est une application à distribuer, là c'est tout autre chose.

Tiens au fait, toi qui affectionne aussi la classe Printers : connais-tu la lib ZPrinters ?

Biblio, à mon avis, très très mal documentée et sous-utlisée.

@+

[zidenne]

salut J-P
j'ai pas bien compris ce que vous voulez dire mais
es que il y a une méthode pour lire les pilots de l'imprimante et de forcer l'impression en recto verso .
vous pouvez meme me donnez des cours sur la lecture des driver
merci d'avance.

[Droïde Système7]

Bonjour,

Je ne suis qu'un débutant en Delphi qui affectionne particulièrement certaines classes Delphi, comme la TPrinter.

Question pilote de ta printeuse, as-tu été voir du côté de ton dossier Imprimantes de Windows :

- Clic droite sur ta printeuse en question ==> Propriété, là tu entreras dans le pilote que je parlais ci-dessus.

Tu devrais découvrir toutes les possiibilités que t'offre ta printeuse recto/verso et ainsi te permettre de gérer ce mode d'impression.

@+

[tourlourou]

regarde du côté de GetDeviceCaps() et DeviceCapabilities()

[LadyWasky]

Réponse ici :
http://www.developpez.net/forums/vie...744&highlight=

Avec ce document là, tu devrais t'en sortir !
http://www.peernet.com/cx710/userguide.pdf


Explications :
Le lien vers le PDF que je t'ai donné dresse une liste de codes (constantes) Windows pour spécifier à une imprimante quel type de carte il doit utiliser en définissant les bonnes valeurs pour "paper size"et "media type", ainsi tu as dans "paper size" les cartes qui ont des bandes magnétiques (Hico, Loco, JIS II) ou non, assorties du puce électronique (IC, IC No protect) ou non. "Media Type" defini la façon d'imprimer en recto/verso, à mon avis c'est là que tu dois creuser.

Ensuite, par rapport au code que je t'ai fourni sur ton autre post, tu peux l'adapter afin d'envoyer à l'imprimante le "Paper size" et le "Media Type", en plus du DUPLEX. Tout ce que tu as a faire c'est d'adapter la procedure ForceDuplexMode que je t'ai déjà fourni. Même à tatons, tu devrait tomber sur les bonnes valeus pour faire fonctionner ton duplex.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
procedure ForceDuplexMode;
var
  Device, Driver, Port: array[0..80] of Char;
  DevMode: THandle;
  pDevmode: PDeviceMode;
  pToMediaType:^byte;
 
begin
  Printer.GetPrinter(Device, Driver, Port, DevMode);
  if Devmode <> 0 then begin
    pDevMode := GlobalLock(Devmode);
    if pDevmode <> nil then
    try
      with pDevmode^ do begin
        //PaperSize
        dmFormName:=258 //égal à BLANK_FACEUP
        //recto-verso 
        dmDuplex := DMDUP_VERTICAL;
 
        //liste des champs à mettre à jour
        dmFields := dmFields or DM_PAPERSIZE or    DM_FORMNAME
                          or DM_DUPLEX;
 
        //choix du media type n°10, sous XP :)
        // en c++, ça donne
        //((BYTE *)(pDevmode+1))[58] = 10 ;
        pToMediaType:=Cardinal(pDevMode)+sizeof(pDevMode^)+58;  //je ne sais plus trop si c'est comme ça qu'on affecte
                              //une adresse particulière de la mémoire, en 
                             //particulier à un pointeur typé, à vérifier donc...
                             //je devrais pouvoir retrouver ça demain...
        pToMediaType^:=10;
      end;
    finally
      GlobalUnlock(Devmode);
    end;
  end; { If }
end;