:Пересылка фйлов через сокеты

Надо переслать файл через сокеты по сетке. Нашёл хороший пример в Examples\Internet\stream но есть один глючок: нельзя в рантайме менять свойство Port у компонента NMStrmServ, только в дезигнтайме. Т.е. меняться то оно меняется но при попытке законектиться на этот порт возникает ошибка. В хелпе по этому свойству есть пометка :In the case of the TNMGeneralServer, the Port property must be set during designtime.
Как это дело можно обойти???