Except no D2005
06/12/2005
0
Saudações
Estou desenvolvendo uma aplicação em DataSnap (3 Camadas) e estou tendo problemas para realizar o tratamento de exceção na entrada no FrontEnd.
Criei um método para testar se a conexão com o Servidor de Aplicação está ocorrendo e quando há algum problema, ele simplesmente não trata o erro, acusa a mensagem no depurador do Deplhi e simplesmente aborta as demais linhas de código do procedimento e entra no sistema, claro que há problemas pois ele não executa as demais linhas de código necessárias para carregar o sistema, mas não entendo porque ele não cai no except.
Segue função:
function TDmDados.ConectarServidor: Boolean;
begin
Try
if not SocketConnection.Connected then
SocketConnection.Connected := True;
Result := True;
except
on E : exception do
begin
Raise EAbort.Create(E.Message);
Result := False;
end;
end;
end;
Lembrando, o problema ocorre quando executo a linha SocketConnection.Connected := True, ele nem cai no except, apenas ignora as demais linhas de código.
Não sei se alguem já se deparou com isso...
Mas desde já agradeço.
Anderson.
Estou desenvolvendo uma aplicação em DataSnap (3 Camadas) e estou tendo problemas para realizar o tratamento de exceção na entrada no FrontEnd.
Criei um método para testar se a conexão com o Servidor de Aplicação está ocorrendo e quando há algum problema, ele simplesmente não trata o erro, acusa a mensagem no depurador do Deplhi e simplesmente aborta as demais linhas de código do procedimento e entra no sistema, claro que há problemas pois ele não executa as demais linhas de código necessárias para carregar o sistema, mas não entendo porque ele não cai no except.
Segue função:
function TDmDados.ConectarServidor: Boolean;
begin
Try
if not SocketConnection.Connected then
SocketConnection.Connected := True;
Result := True;
except
on E : exception do
begin
Raise EAbort.Create(E.Message);
Result := False;
end;
end;
end;
Lembrando, o problema ocorre quando executo a linha SocketConnection.Connected := True, ele nem cai no except, apenas ignora as demais linhas de código.
Não sei se alguem já se deparou com isso...
Mas desde já agradeço.
Anderson.
Dessis Empresarial
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)