Discussion :

[Simlock]

Bonjour,

Je viens vers vous car j'ai dû réaliser un programme en Delphi et je dois communiquer via le port COM.

Pour cela, j'utilise la lib TComPort mais lorsque je souhaite me connecter j'ai le message : "Unable to open com port (Error: 2)"

Voici le code qui me permet de me connecter :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TForm1.B_ConnexionClick(Sender: TObject);
begin
   if (ComPort1.Connected) then
      begin
   	ComPort1.Connected := false;
        B_Connexion.Caption := 'Connexion';
      end
   else
      begin
      	ComPort1.Connected := true;
        B_Connexion.Caption := 'Deconnexion';
      end;
end;

La sélection du port COM est gérée par la lib. J'ai une ComboBox liée à mon composant TComPort.

J'ai déjà réussi à me connecter avec ce code pourtant mais je ne sais pas pourquoi ça bloque maintenant.

Merci pour votre aide.

[Bernard B]

l'option la plus probable au niveau de l'open du port série, c'est que la propriété Port ne contient pas une valeur correspondant à un port série existant sur la machine.
c'est la première chose à vérifier.
L'erreur 2 correspond à un "write failed" donc pas directement lié à l'ouverture du port, il me semble, sauf si l'ouverture déclenche l'émission de quelque chose ?

[Simlock]

J'ai trouvé...

Il y avait configuré un port par défaut dans le composant TComPort, donc quand je me connectais à se port COM mon programme fonctionnait.

La ComboBox de la lib TComPort ne fait que lister les ports ! Elle ne configure pas mon composant pour utiliser le port sélectionner, il faut le faire via le code.

Donc même lorsque je sélectionnais un port, le soft utilisait celui fixé à la compilation

J'étais persuader qu'il le gérait comme tel, d'ailleur le site tuto n'en parle pas du tout !

Merci quand même Bernard pour ton aide.