Hacer una pausa fuera del evento OnTimer y sin usar Sleep
 

Hola compañeros foreros, otra vez estoy aquí con una de mis dudillas.

Esta me ha asaltado al intentar hacer una pausa en mi aplicación de X segundos, fuera del evento OnTimer de un Timer y sin que se me cuelque la actualización visual de la aplicación (es decir, sin usar el sleep).

Para ser más concreto, quiero que, cuando yo inserto una línea en un TMemo, tarde varios segundos en aparecer otra, pareciendo que el ordenador está tardando en escribir.

Gracias simplemente, por leerme

Puede ser que tarde algo en responder a este hilo, :p estoy castigado. Pero si puedo, el viernes me volveré a pasar.

¿Quieres que no se ejecute el timer por nTiempo? Bien puedes desactivarlo, o mejor, internamente puedes manejarlo con GetTickCount y dentro del OnTimer preguntar por este valor y ejecutar o no el código del evento.

Saludos!

y porque no un timer??

Hacete un ciclo que simplemente espere a que haya transcurrido el tiempo deseado... (que es lo que hace sleep). Si no queres que la aplicación "se duerma" durante ese tiempo, llamá dentro del ciclo a Application.ProcessMessages; (eso si, eso tiene sus implicaciones, ya que la aplicación puede ser cerrada, si inicias el proceso con un botón, el usuario puede iniciarlo una vez, quizas estropeandolo todo, en fin, detalles que tendrás que cuidar para que funcione decentemente)

Hasta luego.

;)

Mi aplicación trata de "simular" una conversación con el ordenador, de modo que, al yo escribir un texto, al enviarlo el memo haría un ciclo en las palabras posibles y añadiría las respuestas después de un retardo para que parezca que está escribiendo. No se si me he explicado bien.

Y... también sería posible leer con un timer cada X seg. la última linea del memo... pero si pongo el intervalo a diez segundos, digamos, y envío el mensaje a 9 seg, tardaría muy poco, y si lo hago a los 2 seg, mucho. También podría activarse el timer al enviar el mensaje, pero me gustaría saber si hay alguna forma de conseguir lo que pregunto en el mensaje :) gracias.

(Gracias a Dios que he podido leer este hilo en un momento de despiste de mis padres :) )

probá poner un timer con la cantidad exacta de tiempo que queres que el programa tarde en responder (digamos 3 segundos), la propiedad KeyPreview del formulario a true y en el evento OnKeyUp (del formulario) desactivar y activar el timer. En el evento OnTimer lo primero que haces es desactivarlo, y luego respondes como mas te plazca.

Hasta luego. ;)

He buscado información sobre esa propiedad y no me aclaro, la verdad es que no he podido leer la ayuda de Delphi sobre esa propiedad completa (me arriesgo a que me pillen... ni castigado puedo dejar clubdelphi :p ).

Y sin entender eso, no puedo entenderte

Gracias

Pues esperaremos a que te levanten el castigo... haces tus pruebas, y luego charlamos... :)

Mejor no esperes a que me levanten el castigo sino a que llege el viernes, mientras tanto, podéis darme ideas o sugerencias para facilitarme el trabajo de ese día, en el que tendré poco tiempo de pruebas.

Gracias ;)

talvez te sirve
 

yo tengo un metodo que simula una pausa, con la unica desventaja es la concurrencia, por ejemplo
...
{
System.out.println(System.nanoTime());
pause(3000); //hace una pausa de 3 segundos
System.out.println(System.nanoTime());
...
}

pero al ejecutar parece que hiciese primero la pausa y luego te imprime los dos mensaje, esto es debido al asuntos de los Thread (talvez otro dia averiguo de ese detalle).


public static void pause(long milli){
long t0 = System.nanoTime() + (milli * 1000000L);
while( t0 >= System.nanoTime() );
}