Discussion :

[zwina2004]

Bonjour à vous tous,

Je voudrais développer une application qui se connecte à une imprimante via le port série. donc j'ai développé l'application mais lorsque j'essaye de se connecter à l'imprimante j'arrive pas. C'est pour ça que j'ai fait une petite fenêtre où il y a un combo permettant de recevoir la liste des ports série présents au niveau de l'ordinateur par l'instruction :

Code :

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

1
2
3
4
5
6
7
ListeSupprimeTout(LISTE_SansNom1)
sListeClé = RegistreListeValeur("HKEY_LOCAL_MACHINE\HARDWARE\DEVICEMAP\SerialComm")
ListeAjoute(LISTE_SansNom1,sListeClé)
ListeAjoute(COMBO_Ports_Séries,"--NULL--")
POUR CHAQUE LIGNE DE LISTE_SansNom1
	ListeAjoute(COMBO_Ports_Séries,RegistreLit("HKEY_LOCAL_MACHINE\HARDWARE\DEVICEMAP\SerialComm", LISTE_SansNom1..ValeurAffichée))
FIN

et ça marchait très bien. et dans la même fenêtre j'ai créé un bouton qui contient le code suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
sferme(COMBO_Ports_Séries..ValeurAffichée)
si souvre(COMBO_Ports_Séries..ValeurAffichée,2000,2000) = Vrai ALORS
    info("Le port a été ouvert.")
    si sfixeparamètre(COMBO_Ports_Séries..ValeurAffichée,9600,0,8,1) = vrai alors
        info("Les paramètre ont été correctement initialisés.")
    sinon
        erreur("Les paramètre n'ont pas été correctement initialisés.")
    fin
sinon
    erreur("Le port n'a pas été ouvert.")

et ce bouton c'est juste pour que je sache si le port est ouvert et ses paramètres ont été initialisés ou non.

Sachant que pour que j'utilise cette petite fenêtre j'ai pas mis encore aucun connecteur DB9 au niveau de mon ordinateur.

Le résultat est que la liste des ports séries dans le combo est deux COM1 et COM2, lorsque je choisi le port COM1 et je clique sur le bouton il me confirme que le port a été ouvert mais il me dit que les Les paramètre n'ont pas été correctement initialisés. et lorsque je choisi le port COM2 il m'affiche le message Le port n'a pas été ouvert.

Je vous rappelle que pour l'instant j'ai pas encore branché de connecteur DB9 dans les ports série.

Merci pour votre aide.

[tatayo]

Bonjour,
Je pense qu'en ajoutant un ErreurInfo() dans tes messages d'erreur tu auras peut-être un début de piste sur ce qui ne va pas.

Tatayo.

[zwina2004]

j'ai utilisé erreur(erreurinfo()) et il m'affiche une boite de dialogue vide.

[PointCarreJo]

Salut,

La fonction ErreurInfo doit être utilisée directement après l'erreur constatée car WINDEV peut la réinitialiser sans aucune intervention de l'utilisateur. Donc, je dirais qu'il faudrait déboguer l'application pas à pas afin de déceler où cela coince. Sans information claire sur l'origine ou le type de l'erreur, il est impossible d'apporter une aide efficace.

Cordialement,