Bonjour,
Comment réinitialiser le paramètre SerialPort2.InCount à 0 pour le prochain lecture? J'ai une application qui doit attendre sur le port série les données.
Pour la première passage cela passe mais par contre pour le deuxième
passage comme Form3.SerialPort2.InCount <> 0 alors cela ne marche
plus. C'est une propriété que je peux seulement lire mais pas réinitialiser
à 0. Avez vous rencontrer ce genre de problème ?
Merci pour la proposition
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 function TForm3.ReadResponse_carte: string; begin do While (Form3.SerialPort2.InCount=0) do ReadResponse_carte:=Form3.serialport2.ReadStr(15); exit; Application.ProcessMessages; Form3.TimeOut2.Enabled:=False; if Form3.SerialPort2.InCount=0 then ReadResponse_carte:='TimeOutError' else ReadResponse_carte:=Form3.serialport2.ReadStr(10); end;
Partager