Вобщем работает!!! УРА! Шапки долой!
А теперь вопрос. Как сделать обработку команд от клиента серверу? Взглянул на процедуру procedure TForm1.IdTCPServer1Execute(AThread: TIdPeerThread); и увидел там поток

. Я так и не научился читать из потока и упаваю на твою помощь. Пологаю ту статью можно выкинуть, мы пошли каким-то другим путём...