Firewall settings - Indy 9.00.10 Delphi 7

Giganews Newsgroups
Subject: Firewall settings - Indy 9.00.10 Delphi 7
Posted by:  Marco Gesiot (mar…@gesiot.it)
Date: Thu, 8 Jan 2004

Hi
My Server app has a TCP Server witch comunicates with clients via Internet
I did open the port and DefaultPort on the firewall but unless I open ALL
ports
the server seems to be unreacheble for clients.
Here's the server initialization code:

//Server per dati Realtime
IdTCPServer.DefaultPort := dmBase.OutDefPort;  // 9010 - Open on firewall
IdTCPServer.Bindings.Clear;
    try
        Binding := IdTCPServer.Bindings.Add;
        Binding.IP := dmBase.OutIP;                        // 9011 Open on
firewall
        Binding.Port := dmBase.OutPort;
        IdTCPServer.Intercept := TIdServerIntercept(IdZipIntercept);
        IdTCPServer.Active := true;
    except
        on E : Exception do begin
            //LogErr.Add('Errore Start Server TCP : '+E.Message);
        end;
    end;

Where do I go wrong ??

thanks in advance for any hint

Ciao
Marco

Replies