Bonjour,

j'ai une application qui dialogue avec une plateforme de mesure pédagogique via le port LPT1.

J'utilise l'API ZlPortIO.

Mais il y a un truc que je trouve bizarre. J'utilise un timer tout les 100 ms pour lire le port 378. Mais quand je met la souris ailleurs que dans la fenêtre du programme la valeur du port dégringole, au lieu d'être à 0 elle plafonne à 230...240.

Voici le code (je multiplie la valeur du port par le pas de résolution 19.4 V):

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
procedure TFichePrincipale.TimerReadTimer(Sender: TObject);
begin
  try
    Tension.Caption := Format('%f V ', [(PortReadB($378)-4)*0.0194]);
  except end;
end;
Si quelqu'un a une idée ?

Merci.