Не работает( Все правильно сделал 3 раза перепробовал. Вот скрипты кому надо
***Нажатие Клавиши***
if($key == VK_RETURN)
{
if(!c("edit1")->text) return;
if(c("edit2")->text )
c("TSock1")->Send( c("edit2")->text , c("edit1")->text) ;
else
c("TSock1")->Broadcast(c("edit1")->text);
c("edit1")->text = "";
}
***Сокет присоединение клиента***
c("listBox1")->text .= $Connection.": Подключился.";
***Сокет отключение клиента***
c("listBox1")->text .= $Connection.": Отключился";
***Сокет получение информациии***
if($Type == TSock_Public)
c("listBox1")->text .= $Connection.": ".json_encode($Data);
elseif($Type == TSocj_Private)
c("listBox1")->text .= $Connection.": [Private]".json_encode($Data);
***Появление***
c("TSock1")->Connect( "127.1.1.1" , 2222 );
***2-х клик***
$self->text = "";
0