problemas con ESocketError en delphi

[mflores]

Necesito de la experiencia de los programadores delphi:
la siguiente sintaxis no me funciona si alguien puede ayudarme se lo agradeceria.
try
ClientSocket1.open;

except
on ESocketError do
begin
Showmessage('Posiblemente el usuario no este conectado...!');
end;
end;

lo cierto es que no se ejecuta nunca el codigo dentro del except, en lugar de mostrarme el mensaje deseado me muestra un mensaje de error de sincronismo. Por favor estoy utilizando mal el codigo?
PD: estoy haciendo un chat y es por eso que utilizo sockets...
gracias.