Сохрани вот это: http://hiasm.googlecode.com/svn/elements/delphi/code/hiTCP_Server.pas
Скопируй это в каталог ...HiAsm/Elements/Delphi/code
------------ Дoбавленo:
Вот сервер:
Add(MainForm,4613076,21,105)
{
Left=20
Top=105
link(onCreate,14911643:doOpen,[])
}
Add(TCP_Server,14911643,77,140)
{
Port=180
link(onRead,14911643:doSend,[(119,146)(119,133)(65,133)(65,160)])
}
Поиск
Друзья
Администрация