Timer - TrackBar

[[Caral]]

Hola a Todos
Otra pregunta:
Tengo un TrackBar y un Timer, como hago para que en el evento onchange del TrackBar, el Timer cambie progresivamente el Interval.
Tal vez es posible hacerlo con otro componente ?
Como que hoy es el dia de preguntar para mi.
Saludos

[roman]

¿Qué entiendes tú por cambiar progresivamente?

// Saludos

[[Caral]]

Gracias Roman
El trackBar tiene unas rayas para regular, entiendo que es asi.
Lo que necesito es que al mover el trackbar por sus rayas el timer cambie el interval para que me de un mensage o cierre algo en otra operacion.
Ha esto llamo progresivamente, osea que el interval del timer cambie segun se mueva el trackbar.
Espero me entiendas
Saludos

[roman]

Pero entonces no entiendo cuál es la duda. Sabes dónde hacer el cambio (evento OnChange del TrackBar) y sabes qué cambiar (propiedad Timer.Interval), ¿qué es lo que falta?

// Saludos

[[Caral]]

Esto hago:
En el evento OnChange del TrackBar

Código Delphi [-]
Timer1.Interval:= 1000;

Lo que no entiendo es que hacen esas rayas, me explico:
Cada raya es un interval de en este caso 1000 o es un unico interval y no cambia.
Si no cambia como hago para que cada raya del trackbar sea un interval
esto funciona ?

Código Delphi [-]
Timer1.Interval:= 1000;
Timer1.Interval:= 2000;
Timer1.Interval:= 3000; // Ect.

Saludos

[[seoane]]

Prueba con algo asi, en el evento OnChange:

Código Delphi [-]
   Timer1.Interval:= Trackbar1.Position * 1000;

[[egostar]]

El TrackBar cambia dependiendo de la propiedad PageSize, por default tiene 2, cambialo a 1 y toma el valor de TrackBar1.Position * 1000 que es la unidad en segundos del timer.

Algo así

Código Delphi [-]
 
procedure TForm1.TrackBar1Change(Sender: TObject);
begin
  Timer1.Interval := TrackBar1.Position * 1000;
end;

No se si debes de reiniciar el Timer cada vez que cambias el valor, me imagino que si.

Saludos

[[seoane]]

Empezado por egostar

No se si debes de reiniciar el Timer cada vez que cambias el valor, me imagino que si.

En realidad no hace falta, al cambiar la propiedad Intervalo el timer se reinicia solo.

[[Caral]]

Muchisimas Gracias a Todos
Funciona perfectamente:
Con respecto a reiniciar el timer no es necesario, el interval cambia segun se mueve el trackbar.
Lo unico que he cambiado es el intervalo que 1000 es muy pequeño para lo que necesito, con 15000 es perfecto.
Quedo plenamente agradecido.
Muchas Gracias Roman, seoane, egostar, por vuestra ayuda
Saludos