Чтение и запись.
Тип: Действие.
Возвращает или задает код для выполнения, при отключении клиента от сервера.
Свойство должно быть задано типом значения Действие из библиотеки односкрипта.
Процедура обработки события должна быть объявлена с ключевым словом Экспорт.
СерверКлиент.ПриОтключении = КС.Действие(ЭтотОбъект, "СерверКлиент_ПриОтключении");
Копировать Выделить всё//== Файл Сервер.os == начало Перем КС; Процедура Сервер_ПриПодключенииКлиента() Экспорт СерверКлиент = КС.СерверКлиентАрг().Клиент; СерверКлиент.ПриОтключении = КС.Действие(ЭтотОбъект, "СерверКлиент_ПриОтключении"); СерверКлиент.Отключить(); КонецПроцедуры Процедура СерверКлиент_ПриОтключении() Экспорт Сообщить("СерверКлиент_ПриОтключении"); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptClientServer\OneScriptClientServer\bin\Debug\OneScriptClientServer.dll"); КС = Новый КлиентСерверДляОдноСкрипта(); TCPСервер1 = КС.TCPСервер(10085); TCPСервер1.ПриПодключенииКлиента = КС.Действие(ЭтотОбъект, "Сервер_ПриПодключенииКлиента"); TCPСервер1.Начать(); Сообщить("Сервер запущен."); Пока КС.Продолжать Цикл КС.ПолучитьСобытие().Выполнить(); КонецЦикла; //== Файл Сервер.os == конец //== Файл Клиент.os == начало ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptClientServer\OneScriptClientServer\bin\Debug\OneScriptClientServer.dll"); КС = Новый КлиентСерверДляОдноСкрипта(); TCPКлиент1 = КС.TCPКлиент(КС.TCPКонечнаяТочка("127.0.0.1", 10085)); TCPКлиент1.Подключить(); Приостановить(1000); Пока КС.Продолжать Цикл КС.ПолучитьСобытие().Выполнить(); КонецЦикла; //== Файл Клиент.os == конец
СерверКлиент (ServerClient) Класс | Библиотека OneScriptClientServer