Ayuda con Hilos

[Dark_RavenM]

Empezado por D&W

Ahí si que ya me la pusistes fea.
Que tipo de excepción te estaba dando? y en que línea te decía. Además, por supuesto del mensaje de error.

lo extraño es que le puse asi

Código Delphi [-]

procedure TBarra.Execute;
begin
   try
      sesion.LogonUsername:='lg';
      sesion.LogonPassword:='lg';
      sesion.LogonDatabase:='bd.world';
      sesion.Connected:=true;
//      script.Session:=sesion;
//      script.Lines.Add('select * from usuarios');
//      script.Execute;
//      resultado:=script.Output;

//    Las líneas comentadas arriba fueron puestas en "ActualizarScript"
      Synchronize(ActualizarScript);

      sleep(2000);
      cont:=1;
   except
      on E : Exception do
      begin
         sleep(2000);
         cont:=1;
         ShowMessage(E.ClassName+' error: '+E.Message);
      end;


   end;
end;

y no me regresa el mensaje de error que esta ocurriendo solo se queda la barra de progreso ciclada