Delphi. Можно ли отправить данные через порт открытый другой программой?

[losticsx]

Только не пинайте сильно, если буду сейчас говорить глупости.
Запущена программа, которая открыла порт 2865.
И я хочу отправить данные через этот порт. Как?
Я использую компонент TcpClient.

//устанавливаю порт
...
TcpClient1.LocalHost:='192.168.1.1' ;
TcpClient1.LocalPort:='2865';
...
//отправляю
...
TcpClient1.SendBuf(buf, SizeOf(buf));
...

Однако, нифига не получается. Как показывает снифер передача идет через другой порт (((

[evg_m]

F1 TTcpClient Properties
Specifies the name of the remote system.

Delphi syntax:

TSocketHost = type string;
property RemoteHost: TSocketHost;

C++ syntax:

__property AnsiString RemoteHost = {read=FRemoteHost, write=SetRemoteHost};

Description

Use RemoteHost to get the name of the system on the other end of the socket connection. RemoteHost is a string containing the domain name and service of the remote endpoint of the socket connection, such as

[baster128]

Используй компоненты ClientSocket, ServerSocket по умолчанию в делфях они не устанавливаются. Открой в делфях InstalProject и поставь dslsockets70.dpl. Настройки компонентов примитивные Open, Close.В папку с exe-шником скопируй то, что в архиве. Забыл dslsockets70.dpl. в папке Bin.