choisir imprimante par programation

Si t'as le nom de l'imprimante oui, puisque la fonction appelle l'imprimante par son "nom"

Sinon, si tu veux, tu peux passer par un fichier ini pour éviter de changer le code source à chaque fois après des éventuels changements de nom des imprimante sur les PCs des utilisateurs.

 

Voici un exemple :

J'ai crée 2 fenêtres:
1- Fenêtre de choix des imprimantes
2- Fenêtre de l'impression avec un bouton imprimer

Fenêtre 1



Code Initialisation de la fenêtre :

Code (Windev):

//*Initialisation*
sFichier est une chaîne
//********************

sFichier =

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

()+"\ParamImprimantes.ini"

RemplirListeImprimantes()
sValeur est une chaîne

// Lit la valeur 'Nom' de l'imprimante 1
sValeur =

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

("Imprimante_1", "Nom", "", sFichier)

SI

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

ALORS
   

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

()
FIN

// Recherche de de l'imprimante 1 dans la liste 1
COMBO_Imprimante_1=

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(COMBO_Imprimante_1,sValeur)

// Lit la valeur 'Nom' de l'imprimante 2
sValeur =

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

("Imprimante_2", "Nom", "", sFichier)

SI

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

ALORS
   

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

()
FIN

// Recherche de de l'imprimante 2 dans la liste 2
COMBO_Imprimante_2=

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(COMBO_Imprimante_2,sValeur)
 

Code Bouton Valider :

Code (Windev):

SI PAS

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(sFichier) = Vrai ALORS
   

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(sFichier)
FIN

// Modifie la valeur 'Nom'

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

("Imprimante_1", "Nom", COMBO_Imprimante_1..ValeurAffichée, sFichier)

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

("Imprimante_2", "Nom", COMBO_Imprimante_2..ValeurAffichée, sFichier)

SI

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

ALORS
   

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

()
FIN

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

()
 

Fenêtre 2



Le code du bouton Imprimer sera alors :

Code (Windev):

sFichier est une chaîne =

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

()+"\ParamImprimantes.ini"

sNomImprimante_1 est une chaîne =

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

("Imprimante_1", "Nom", "", sFichier)
sNomImprimante_2 est une chaîne =

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

("Imprimante_2", "Nom", "", sFichier)

// Impression sur Imprimante 1
SI

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(sNomImprimante_1) ALORS
   

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

()
   

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(ETAT_Test)
FIN
// Impression sur Imprimante 2
SI

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(sNomImprimante_2) ALORS
   

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

()
   

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(ETAT_Test)
FIN
 

Bon dev.

 

Pour revenir à nouveau sur l'imprimante par défaut, ajoute juste un iRAZ() après l'impression de l’état

Code (Windev):

// Impression sur Imprimante 2
SI

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(sNomImprimante_2) ALORS
   

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

()
   

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(ETAT_Test)
FIN

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

()
 

Edit: J'ai oublié la procédure pour remplir les listes des imprimantes

Code (Windev):

PROCÉDURE RemplirListeImprimantes()

sListeImprimante est une chaîne
sListeImprimante =

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

()

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(COMBO_Imprimante_1,sListeImprimante)

Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

(COMBO_Imprimante_2,sListeImprimante)
 

Bon dev.