diff --git a/UnitConfig.dcu b/UnitConfig.dcu
index 5866639..b9f5fc9 100644
Binary files a/UnitConfig.dcu and b/UnitConfig.dcu differ
diff --git a/UnitConfig.dfm b/UnitConfig.dfm
index 5283774..5c16762 100644
--- a/UnitConfig.dfm
+++ b/UnitConfig.dfm
@@ -1776,7 +1776,7 @@ object FormConfig: TFormConfig
     Top = 8
     Width = 585
     Height = 457
-    ActivePage = TabSheetAig
+    ActivePage = TabSheetSig
     Font.Charset = DEFAULT_CHARSET
     Font.Color = clBackground
     Font.Height = -11
diff --git a/UnitConfig.pas b/UnitConfig.pas
index dd69463..ad36da7 100644
--- a/UnitConfig.pas
+++ b/UnitConfig.pas
@@ -2009,6 +2009,7 @@ procedure TFormConfig.ComboBoxDecChange(Sender: TObject);
 var s: string;
 begin
 //  Affiche(IntToStr(ComboBoxDec.ItemIndex),clyellow);
+  if NbreFeux<lignecliquee+1 then exit;
   feux[lignecliquee+1].decodeur:= ComboBoxDec.ItemIndex;
   s:=encode_sig(lignecliquee+1);
   formconfig.RichSig.Lines[lignecliquee]:=s;
@@ -2504,6 +2505,7 @@ begin
   else asp:=i+6;
   end;  
   index:=lignecliquee+1;  // index du feu
+  if NbreFeux<index then exit;
   feux[index].aspect:=asp;
   
   s:=encode_sig(index);
diff --git a/UnitPrinc.dcu b/UnitPrinc.dcu
index 120d25b..4002d22 100644
Binary files a/UnitPrinc.dcu and b/UnitPrinc.dcu differ
diff --git a/UnitPrinc.pas b/UnitPrinc.pas
index 692c187..f4afcbe 100644
--- a/UnitPrinc.pas
+++ b/UnitPrinc.pas
@@ -168,7 +168,7 @@ const
 titre='Signaux complexes GL ';
 tempoFeu=100;
 MaxAcc=2048;
-LargImg=50;HtImg=91; // image des feux
+LargImg=50;HtImg=91; // Dimensions image des feux
 const_droit=2;const_devie=1;  // positions aiguillages transmises par la centrale LENZ
 const_devieG_CDM=3;  // positions aiguillages transmises par cdm
 const_devieD_CDM=2;  // positions aiguillages transmises par cdm
@@ -397,7 +397,7 @@ end;
 
 // renvoie le 1er numéro de bit à 1
 // ex BitNum(4)=2
-Function BitNum(n : word) : integer;
+Function PremBitNum(n : word) : integer;
 var i : integer;
     trouve : boolean;
 begin
@@ -407,7 +407,7 @@ begin
     if not(trouve) then inc(i);
     n:=n shr 1;
   until (i=16) or trouve;
-  BitNum:=i;
+  PremBitNum:=i;
 end;
 
 // conversion du motif de bits (codebin) de la configuration du signal complexe en deux mots:
@@ -418,8 +418,8 @@ end;
 procedure code_to_aspect(codebin : word;var premierbit,combine : word) ;
 var i,mot : word;
 begin
-  premierBit:=BitNum(CodeBin and $3ff);
-  combine:=BitNum(CodeBin and $fc00);
+  premierBit:=PremBitNum(CodeBin and $3ff);
+  combine:=PremBitNum(CodeBin and $fc00);
 end;
 
 // dessine un cercle plein dans le feu
diff --git a/verif_version.dcu b/verif_version.dcu
index 9758f9a..adc16f4 100644
Binary files a/verif_version.dcu and b/verif_version.dcu differ