Se me olvido una cosilla..
Esta línea:
Código Delphi
[-]Timer1.Interval := SpinEdit1.Value;
Donde la incluyo en el código de oscarac:
Código Delphi
[-]procedure TForm1.SpinEdit1Change(Sender: TObject);
var i,c:integer;
var s:string;
begin
begin
Timer1.Interval := SpinEdit1.Value;
s:=Tspinedit(sender).text;
val(s,i,c);
if c <> 0 then
begin
Tspinedit(sender).value:=Tspinedit(sender).tag;
beep;
end
else
Tspinedit(sender).tag:=i;
end;
end;
Porque probé y aunque pueda cambiar el número del spinedit no cambia el intervalo del timer
Saludos