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

V5.6

Browse Source
This commit is contained in:
f1iwq2
2023-02-25 11:29:16 +01:00
parent 4e63a59382
commit 9da5aa677c
33 changed files with 1459 additions and 1758 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Unitplace.pas
View File

@@ -173,7 +173,6 @@ begin
inc(it);
//detecteur[detect].adrTrain:=trains[i].adresse;
//event_detecteur(detect,true,trains[i].nom_train);
Affiche('Positionnement train '+detecteur[detect].train+' sur détecteur '+intToSTR(detect)+' vers '+Ssuiv,clLime);
{
SauvefiltrageDet0:=filtrageDet0;
filtrageDet0:=0;
@@ -203,6 +202,9 @@ begin
event_det_train[it].det[1].adresse:=prec;
event_det_train[it].det[1].etat:=false;
event_det_train[it].nom_train:=placement[i].train;
Affiche('Positionnement train '+detecteur[detect].train+' sur détecteur '+intToSTR(detect)+' vers '+Ssuiv,clLime);
inc(N_trains);
end