Código Delphi [-] procedure TForm1.SpinEdit1Change(Sender: TObject); var A: Integer; begin Timer1.Interval := SpinEdit1.Value; A := StrToIntDef(SpinEdit1.Text, 0) end;
procedure TForm1.SpinEdit1Change(Sender: TObject); var A: Integer; begin Timer1.Interval := SpinEdit1.Value; A := StrToIntDef(SpinEdit1.Text, 0) end;