Cita:
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;
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