capture ESocketError, host has failed to respond

[BoOmSoLuTioN]

hello,

please, how to capture Exception ESocketError (10060), host has failed to respond


i try this but is not work :

Code: Select all

  try
      cnx.ConnectString:='login/[email protected]:1521:BIZ';
      cnx.Connect;
  Except on E: ESocketError  do
        begin
             showmessage('Error; Enable to connect!');
        end;
  end;

cnx : is a TOraSession Compenent.

thanx.

[Plash]

Try to catch EOraError:

Code: Select all

try
...
except
  on E: EOraError do begin
    ShowMessage('Error; Enable to connect!'); 
  end; 
end;

You should add OraError unit to 'uses'.

If this does not work, you can get actual type of exception using the following code:

Code: Select all

try
...
except
  on E: Exception do begin
    ShowMessage(E.ClassName); 
  end; 
end;