V8.4

2024-01-26 14:11:58 +01:00
parent 89ebfe67f2
commit c0edae3eb7
24 changed files with 966 additions and 738 deletions
--- a/UnitSR.pas
+++ b/UnitSR.pas
@@ -482,8 +482,8 @@ end;

 procedure TFormSR.FormCreate(Sender: TObject);
 var i : integer;
-    c : tcomponent;
 begin
+  position:=poMainFormCenter;
  for i:=0 to 19 do
  begin
    ComboBoxAdr1.items.add(etats[i]);