[krlox31416]

sip...

a lo mejor si hechas a andar un procedimiento se resuelve tu problema...

si utilizas los milisegundos checa en la ayuda que trae delphi...

y veras...

oarece que la abreviatura que utiliza es msecs...

haber si en algo te sirve este procedimiento:

Código Delphi [-]
procedure Delay(msecs:integer);
 var
    FirstTickCount:longint;
 begin
      FirstTickCount:=GetTickCount;
      repeat
            Application.ProcessMessages;
      until ((GetTickCount-FirstTickCount) >= Longint(msecs));
 end;

y la mandas llamar asi en milisegundos:

Código Delphi [-]

procedure TForm2.ButtonClick(Sender: TObject);
begin
Delay(2000);  //lo que va entre parentesis son los segundos en mi caso son 2 segundos los que neceito... ya dependera de ti tal vez con ciclos ajustarla...
end;

sele pues y espero y te sirva!!!

saludos !!!