V7.1

2023-08-12 15:09:33 +02:00
parent 1b54657c0c
commit af03d91a65
22 changed files with 3847 additions and 1002 deletions
--- a/Unitplace.pas
+++ b/Unitplace.pas
@@ -357,7 +357,7 @@ begin

      // si il y a un signal sur le détecteur de démarrage du train est il au rouge?
      if adrFeu<>0 then
-      begin
+      begin
        id:=index_Signal(AdrFeu);
        a:=feux[id].EtatSignal;
        if ((a=semaphore_F) or (a=carre_F) or (a=violet_F)) then rouge:=true;