TCPКлиент.ПолучитьПоток (TCPClient.GetStream) Метод

Копировать     Выделить всё

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();

TCPСлушатель1 = Ф.TCPСлушатель(Ф.IpАдрес("127.0.0.1"), 8888);
TCPСлушатель1.Начать();

TCPКлиент1 = Ф.TCPКлиент();
TCPКлиент1.Подключить("127.0.0.1", 8888);
Подключен = TCPКлиент1.Подключен;

ПотокСети1 = TCPКлиент1.ПолучитьПоток(); // Получили поток через который общаются TCPСлушатель1 (сервер) и TCPКлиент1 (клиент)
Сообщить("" + ПотокСети1);

ПотокСети1.Закрыть();
TCPКлиент1.Закрыть();

Ф.ЗапуститьОбработкуСобытий();

Копировать     Выделить всё

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();

TCPСлушатель1 = Ф.TCPСлушатель(Ф.IpАдрес("127.0.0.1"), 8888);
TCPСлушатель1.Начать();

TCPКлиент1 = Ф.TCPКлиент();
TCPКлиент1.Подключить("127.0.0.1", 8888);
Подключен = TCPКлиент1.Подключен;

ПотокСети1 = TCPКлиент1.ПолучитьПоток(); // Получили поток через который общаются TCPСлушатель1 (сервер) и TCPКлиент1 (клиент)

ПотокСети1.Закрыть();
TCPКлиент1.Закрыть();

Сообщить(?(
"" + ПотокСети1 = "КлПотокСети"
, "", "!!! ") + "TCPКлиент.ПолучитьПоток (TCPClient.GetStream) Метод" + " " + ТекущаяДата());