Consulta de MultiHilos ( thread )

[[seoane]]

Comprueba que dentro del bucle no se este produciendo alguna excepcion. Piensa que hay excepciones silenciosas (abort), que pueden pasar desapercibidas.

Prueba a meter el contenido del bucle dentro de un bloque try ... except

Código Delphi [-]
procedure TThread6.Execute;
begin
  CoInitialize(nil);
  repeat
    try
      sleep(20000);    
      RecepAutoVeriOferta;    
    except
        // Aqui trata el error
    end;  
  until terminated;
  CoUninitialize;
end;