This commit is contained in:
f1iwq2
2025-01-11 18:47:43 +01:00
parent 40d91f9ca8
commit 95cf06b007
16 changed files with 467 additions and 304 deletions

View File

@@ -352,7 +352,7 @@ begin
end;
procedure TFormModifAction.ComboBoxFamilleChange(Sender: TObject);
var i,n,famille : integer;
var i,famille : integer;
s : string;
begin
ListBoxOper.Clear;
@@ -1711,7 +1711,7 @@ begin
end;
procedure TFormModifAction.SpinEditEtatopChange(Sender: TObject);
var i,o,erreur,op : integer;
var i,erreur,op : integer;
begin
if (ligneclicAct<0) or clicliste then exit;
val(SpinEditEtatop.text,i,erreur);