IP Public

[gaitolini]

É Possível conectar o servidor com IP Public?

{ TMQTTServer }

procedure TMQTTServer.Activate (Enable: boolean);
var
i : integer;
begin
if FEnable = Enable then exit;
if (Enable) then
begin
Server.Banner := '';
Server.Addr := '0.0.0.0'; // IP Public? ***************************************
Server.Port := IntToStr (FPort);
Server.Proto := 'tcp';
Server.ClientClass := TClient;
try
Server.Listen;
FEnable := true;
except
FEnable := false;
end;
if FEnable then SetTimer (Timers, 3, 100, nil);
end
else
begin
FEnable := false;
for i := 0 to Server.ClientCount - 1 do
try
TClient (Server.Client[i]).Close;
except
end;
try
Server.Close;
except
end;
KillTimer (Timers, 1);
KillTimer (Timers, 2);
KillTimer (Timers, 3);
end;
if Assigned (FOnEnableChange) then
FOnEnableChange (Self);
end;