Angel Master


Registrado: 15 Abr 2003Mensajes: 2311Ubicación: Toledo (España)
|
Publicado: Lun 29 Mar, 2004 8:00 am Asunto: |
|
|
No sé si te he entendido bien, pero a ver si es algo como esto.
| Cita: | Tengo una variable tMinuto (TDateTime, con valor 00:30:00) y otra nIntervalo (int) en la que guardo el valor tecleado; tengo un elemento Timer.
| Código: | int nIntervalo;
Word Hour, Mins, Secs, Milis;
nIntervalo = StrToInt(Edit1->Text); // Edit1 valor tecleado
DecodeTime(tMinuto, Hour, Mins, Secs, Milis);
Timer1->Interval = 60000 * Mins / nIntervalo; |
|
La conversión anterior (60000 * Mins) se debe a que la propiedad Interval del Timer ha de expresarse en milisegundos. Espero que sea esto. _________________ Un saludo
Necesitamos tu ayuda: Envía AI al 27595 (Coste 1,20 euros + IVA) |
|