Für Linux compilen

[implementation]

Mit genannter Direktive läuft auch das:
IdTCPServer1.OnConnect := IdTCPServer1Connect;