Club Builder

[toni]

Hola amigos, hace tiempo q no consulto nada pero hoy toca,

la cosa es q tengo un problemilla os explico:


Un programa para ciber con un cliente y un servidor se conectan mediante ClientSocket y ServerSocket. La cosa es q al cliente le he puesto un reloj para q este todo el rato haciendo intentos de conexion para q si no esta el servidor cuando arranque se conecten automaticamente. El problema esta en q da un error q pone Windows Socket error API connect. En el evento error del componente ClientSocket he puesto ErrorCode=0; pero nada y en el reloj he puesto try{
}
catch(ESocketError &E){}

pero nada

el codigo q hay en el reloj es el siguiente

double po;
AnsiString a;
AnsiString b;
comun->First();//nos dirigimos al primer registro
a=comun->FieldValues["Port"];//nos dirigimos al campo puerto
po=a.ToDouble();
b=comun->FieldValues["IP"];

try{
if(ClientSocket1->Active){}
if(b.Length()>0){
ClientSocket1->Host=b;
ClientSocket1->Port=po;

ClientSocket1->Active=true;
ClientSocket1->Open();
}
}
catch(ESocketError &e){

}

esto lo hace cada seg

ayudarme por fa o si sabeis como hacer q el cliente actue como autonomo y cuando se conecte el servidor se conecte el cliente automaticamente.


UN SALUDO Y GRACIAS