V9.7

2024-12-20 12:17:29 +01:00
parent 087351ecd3
commit 02eccff67e
21 changed files with 2056 additions and 1395 deletions
--- a/UnitTCO.dfm
+++ b/UnitTCO.dfm
@@ -211,6 +211,102 @@ object FormTCO: TFormTCO
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
      FFFF}
  end
+  object ImageBt0Bistable: TImage
+    Left = 672
+    Top = 0
+    Width = 48
+    Height = 48
+    Picture.Data = {
+      07544269746D6170F6040000424DF60400000000000076000000280000003000
+      000030000000010004000000000080040000C20E0000C20E0000100000000000
+      0000000000000000800000800000008080008000000080008000808000008080
+      8000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
+      FF00BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB88888888888
+      88888888888888888888888888888888888BB888888888888888888888888888
+      8888888888888888888BB8888888888888888888888888888888888888888888
+      888BB8888888888888888888888888888888888888888888888BB88888888888
+      88888888888888888888888888888888888BB888888888888888888888888888
+      8888888888888888888BB8888888888888888888888888888888888888888888
+      888BB8888888888888888888888888888888888888888888888BB88888888880
+      00888888888888888888888888888888888BB800000000000000888888888888
+      8888888880000000088BB8000000000000000888888888888888888880000000
+      088BB8000000000000000008888888888888888880000000088BB88888888880
+      00000000088888888888888888888888888BB888888888888000000000888888
+      8888888888888888888BB8888888888888000000000088888888888888888888
+      888BB8888888888888880000000008888888888888888888888BB88888888888
+      88888000000000088888888888888888888BB888888888888888888000000000
+      0888888888888888888BB8888888888888888888800000000088888888888888
+      888BB88888888888888888888C0000000000888888888888888BB88888888888
+      888888888CCC00000000088888888888888BB88888888888888888888CCC8800
+      0000000888888888888BB88888888888888888888CCC88800000000088888888
+      888BB88888888888888888888CCC88888000000088888888888BB88888888888
+      888888888CCC88888800000088888888888BB88888888888888888888CCC8888
+      8888000888888888888BB88888888888888888888CCC88888888888888888888
+      888BB88888888888888888888CCC88888888888888888888888BB88888888888
+      888888888CCC88888888888888888888888BB88888888888888888888CCC8888
+      8888888888888888888BB88888888888888888888CCC88888888888888888888
+      888BB8888888888888CC88888CCC88888CC8888888888888888BB88888888888
+      88CC88888CCC88888CC8888888888888888BB8888888888888CCCCCCCCCCCCCC
+      CCC8888888888888888BB8888888888888CCCCCCCCCCCCCCCCC8888888888888
+      888BB8888888888888CCCCCCCCCCCCCCCCC8888888888888888BB88888888888
+      88888888888888888888888888888888888BB888888888888888888888888888
+      8888888888888888888BB8888888888888888888888888888888888888888888
+      888BB8888888888888888888888888888888888888888888888BB88888888888
+      88888888888888888888888888888888888BB888888888888888888888888888
+      8888888888888888888BB8888888888888888888888888888888888888888888
+      888BB8888888888888888888888888888888888888888888888BB88888888888
+      88888888888888888888888888888888888BB888888888888888888888888888
+      8888888888888888888BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
+      BBBB}
+  end
+  object ImageBt1Bistable: TImage
+    Left = 672
+    Top = 56
+    Width = 48
+    Height = 48
+    Picture.Data = {
+      07544269746D6170F6040000424DF60400000000000076000000280000003000
+      000030000000010004000000000080040000C20E0000C20E0000100000000000
+      0000000000000000800000800000008080008000000080008000808000008080
+      8000C0C0C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
+      FF00BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB88888888888
+      88888888888888888888888888888888888BB888888888888888888888888888
+      8888888888888888888BB8888888888888888888888888888888888888888888
+      888BB8888888888888888888888888888888888888888888888BB88888888888
+      88888888888888888888888888888888888BB888888888888888888888888888
+      8888888888888888888BB8888888888888888888888888888888888888888888
+      888BB8888888888888888888888888888888888888888888888BB88888888800
+      00000000000000000000000000888888888BB800000000000000000000000000
+      0000000000000000088BB8000000000000000000000000000000000000000000
+      088BB8000000000000000000000000000000000000000000088BB88888888800
+      00000000000000000000000000888888888BB8888888888888888888888CCC88
+      8888888888888888888BB8888888888888888888888CCC888888888888888888
+      888BB8888888888888888888888CCC888888888888888888888BB88888888888
+      88888888888CCC888888888888888888888BB8888888888888888888888CCC88
+      8888888888888888888BB8888888888888888888888CCC888888888888888888
+      888BB8888888888888888888888CCC888888888888888888888BB88888888888
+      88888888888CCC888888888888888888888BB8888888888888888888888CCC88
+      8888888888888888888BB8888888888888888888888CCC888888888888888888
+      888BB8888888888888888888888CCC888888888888888888888BB88888888888
+      8888CC88888CCC88888CC88888888888888BB888888888888888CC88888CCC88
+      888CC88888888888888BB888888888888888CCCCCCCCCCCCCCCCC88888888888
+      888BB888888888888888CCCCCCCCCCCCCCCCC88888888888888BB88888888888
+      8888CCCCCCCCCCCCCCCCC88888888888888BB888888888888888888888888888
+      8888888888888888888BB8888888888888888888888888888888888888888888
+      888BB8888888888888888888888888888888888888888888888BB88888888888
+      88888888888888888888888888888888888BB888888888888888888888888888
+      8888888888888888888BB8888888888888888888888888888888888888888888
+      888BB8888888888888888888888888888888888888888888888BB88888888888
+      88888888888888888888888888888888888BB888888888888888888888888888
+      8888888888888888888BB8888888888888888888888888888888888888888888
+      888BB8888888888888888888888888888888888888888888888BB88888888888
+      88888888888888888888888888888888888BB888888888888888888888888888
+      8888888888888888888BB8888888888888888888888888888888888888888888
+      888BB8888888888888888888888888888888888888888888888BB88888888888
+      88888888888888888888888888888888888BB888888888888888888888888888
+      8888888888888888888BBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBB
+      BBBB}
+  end
  object ScrollBox: TScrollBox
    Left = 8
    Top = 12
@@ -1537,9 +1633,9 @@ object FormTCO: TFormTCO
      object N8: TMenuItem
        Caption = '-'
      end
-      object rouverunlment1: TMenuItem
+      object Trouverunlment1: TMenuItem
        Caption = 'Trouver un '#233'l'#233'ment'
-        OnClick = rouverunlment1Click
+        OnClick = Trouverunlment1Click
      end
      object DessinerleTCO1: TMenuItem
        Caption = 'Dessiner le TCO'