Discussion :

[ElioLaMoula]

Bonjour, j'ai ce code qui permet d'imprimer une feuille A4 si le paramètre de l'imprimante par défaut est A4, et pareil pour A5. Cependant la récupération du format par défaut ne se fait pas correctement, avez-vous une idée de : Comment récupérer le format par défaut de l'imprimante ET SURTOUT Comment changer le format par défaut de l'imprimante :

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
 
// -------------------------------------------- IMPRIMANTE -------------------------------------------- //
 
A4 est une chaîne
A5 est une chaîne
A4 = iFormatPapier_A4
A5 = iFormatPapier_A5
 
iParamètre(iAlimentationPapier, iAlimentationPapier_Cassette) //Configures le bac qui intéresse 
 
// Vérifie le format du papier, si c'est ni A4 ou A5 alors message d'erreur.
SELON iParamètre(iFormatPapier)
       CAS A4 :  iImprimeEtat(ETAT_Table_Patient)
       CAS A5 :  iImprimeEtat(ETAT_Table_Patient_A5, iFormatPapier_A5, iOrientation_Paysage)
       AUTRE CAS : Info("Impossible d'imprimer, le format ne respecte pas les normes de l'imprimante (A4 ou A5)")            
FIN
 
iParamètre(iAlimentationPapier, iAlimentationPapier_Haut) //Configures le bac qui intéresse
 
 
 // Vérifie le format du papier, si c'est ni A4 ou A5 alors message d'erreur. Imprime le nombre de page cohérent à la précédente saisie
SELON iParamètre(iFormatPapier)
       CAS A4 : iImprimeEtat(ETAT_Table_Patient_circulation,iParamètre(iNbCopie, SAI_CopieFicheCirculation), iFormatPapier_A4)
       CAS A5 : iImprimeEtat(ETAT_Table_Patient_circulation,iParamètre(iNbCopie, SAI_CopieFicheCirculation), iFormatPapier_A5)    
       AUTRE CAS : Info("Impossible d'imprimer, le format ne respecte pas les normes de l'imprimante (A4 ou A5)")        
FIN

[frenchsting]

Bonjour,

As tu regardé du côté de iconfigure() ?

[ElioLaMoula]

Oui, le problème est que l'imprimante possède plusieurs bac : cassette, bas... Chaque bac peu avoir une config différente (A4, A5...). J'aimerais donc récupérer automatiquement dans mon code la config d'un bac choisis. Exemple :

Code :

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

1
2
3
4
5
6
7
 
 
SELON iParamètre(iAlimentationPapier_Cassette..iFormatPapier)
CAS iFormatPapier_A4 : 
CAS iFormatPapier_A5 : 
AUTRE CAS :
FIN

Cependant ce n'est pas aussi simple car cette écriture ne marche pas : "iAlimentationPapier_Cassette..iFormatPapier"

[frenchsting]

Bonjour,

Dans un premier temps, tu peux lister les imprimantes "reliées" au PC avec ilisteimprimante().

Ensuite, via les API Windows, tu peux avoir la liste des bacs. Un exemple (pas "à jour de version", mais qui doit fonctionner) : ici

Finalement pour le papier "en cours" dans chaque bac, il faut, je pense, regarder du côté de l'API GetDeviceCaps. Je n'ai pas le courage de chercher plus avant à cette heure-ci...