easylinux/SignauxComplexes
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

V9.8

Browse Source
This commit is contained in:
f1iwq2
2025-02-17 16:56:38 +01:00
parent 434cf35af1
commit 3d109c0b3c
19 changed files with 2061 additions and 702 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
UnitMesure.pas
View File

@@ -54,7 +54,7 @@ uses UnitPrinc,unitTCO;
procedure arret_mesure ;
begin
mesureTrains:=false;
vitesse_loco('',0,trains[indexTrainMes].adresse,0,10);
vitesse_loco('',0,trains[indexTrainMes].adresse,0,10,ActionVitesse); // action vitesse pour ne pas générer d'event vitesse
with formMesure do
begin
ComboBoxTrains.Enabled:=true;
@@ -219,7 +219,7 @@ begin
mesureTrains:=true;
vitesse_loco('',0,trains[indexTrainMes].adresse,v1,10);
vitesse_loco('',0,trains[indexTrainMes].adresse,v1,10,ActionVitesse); // ActionVitesse pour ne pas générer d'event_vitesse
LabelMesC.Visible:=true;
LabelMesC.top:=178;