V8.41

2024-02-02 18:13:19 +01:00
parent c0edae3eb7
commit 039f66ed6f
25 changed files with 702 additions and 528 deletions
--- a/Unitplace.pas
+++ b/Unitplace.pas
@@ -131,6 +131,7 @@ begin
  EditDir6.Text:=IntToSTR(placement[6].detdir);
  Edit6.text:=intToSTR(placement[6].detecteur);
  CheckInverse6.Checked:=placement[6].inverse;
+  defocusControl(ButtonInitAig,false);
 end;

 procedure TFormPlace.ButtonPlaceClick(Sender: TObject);