Delphi - Tempo no Delphi

Se você necessita que seu programa espere um determinado tempo para iniciar uma nova rotina, a instrução Sleep pode ajudar, veja um exemplo:

Sleep(5000); //Onde 5000 = 5 segundos;

Exemplo da rotina em um componente Button:

procedure TForm1.Button1Click(Sender: TObject);
begin
   Sleep(5000);
   Showmessage('Tempo de 5 segundos...'); //Quando você clicar no botão, a mensagem só aparecerá após 5 segundos.
end;

Eu costumo aplicar essa rotina quando vou imprimir muitos relatórios. Dou um Tempo de 1 segundo para enviar uma nova impressão para spool da impressora.

Obs: Tem que ter a biblioteca "SysUtils" na Uses do Form para o Delphi conseguir reconhecer o comando Sleep.