Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   procedure paso a paso (https://www.clubdelphi.com/foros/showthread.php?t=3187)

Silver 26-08-2003 20:18:52

procedure paso a paso
 
Vamos a ver, estoy diseñando un procedimiento que necesita funcionar con tiempo, es decir, necesita esperar un tiempo determinado hasta ejecutar la siguiente línea de código.

procedure MostrarTexto(Texto: String);
begin
Connect;
// que tarde 3 segundos en ejecutar el siguiente codigo
Send(Texto);
Disconnect;
end;


y en un button pondria algo así como:
MostrarTexto('hola');

Osea hacer que tarde X tiempo en leer una linea de codigo despues de haber realizado la linea anterior de codigo. ¿Me explico?

Gracias;)

delphi.com.ar 26-08-2003 20:24:00

Puedes utilizar la WinApi Sleep, que es de muy fácil implementación:

Código:

procedure MostrarTexto(Texto: String);
begin
  Connect;
  Sleep(3000); {Espera 3''}
  Send(Texto);
  Sleep(1000); {Espera 1''}
  Disconnect;
end;

Saludos!


La franja horaria es GMT +2. Ahora son las 00:05:16.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi