Aguardar 5 segundos

Question

Alguem sabe como fa�o para demorar 5 segundos para executar um comando. Ex: edit1.text := �teste�;     //espera 5 segundos     edit1.text := �teste2�;...

Cabelo · Accepted Answer

utilizando a fun��o sleepassimEx: edit1.text := �teste�; sleep(5000); edit1.text := �teste2�;...

Kroki · Answer

Antes do Sleep,vc tem que colocar esse comando;
Application.ProcessMessages
Vc sempre tem que usar esse comando antes de trocas de imagens ou texto(como no edit)porque o Windows processa as mensagens primeiro.