afandi писал(а):
а что за капитал там внизу по полоской с процентом?Нужен для анбана, ну, если тебя забанили из него береться n часть и ты разбанен... вроде так.. если я не ошибаюсь... надо будет у дилмы уточнить... он не давно мне рассказывал... а я в точности не помню...
Ну, а по теме...
Вот серверная часть... сделал поиск по id, при нахождении выдает id в поток и выводит msg с id... дальше постарайся сам получение и отправку сделать... думаю это не будет трудно, а у меня итак чат висит еще, да и тут помощь, а не "сделайте за меня"
code_11323.txt
------------ Дoбавленo:
afandi писал(а):
а что за капитал там внизу по полоской с процентом?Нужен для анбана, ну, если тебя забанили из него береться n часть и ты разбанен... вроде так.. если я не ошибаюсь... надо будет у дилмы уточнить... он не давно мне рассказывал... а я в точности не помню...
Ну, а по теме...
Вот серверная часть... сделал поиск по id, при нахождении выдает id в поток и выводит msg с id... дальше постарайся сам получение и отправку сделать... думаю это не будет трудно, а у меня итак чат висит еще, да и тут помощь, а не "сделайте за меня"
Add(MainForm,44932,28,49)
{
Width=349
Height=305
Point(onClose)
link(onCreate,3363318:doOpen,[])
link(onClose,3363318:doClose,[])
}
Add(TCP_Server,3363318,105,63)
{
Port=534
link(onRead,10028629:doEvent1,[])
link(onConnect,7441850:doAdd,[(159,76)(159,153)])
}
Add(ListBox,7441850,182,147)
{
Left=10
Top=15
Width=185
Height=245
}
Add(StrPart,4941184,266,70)
{
Char=";"
link(onPart,2143801:doEvent1,[])
}
Add(Charset,7860795,210,70)
{
Type=4
link(onCharset,4941184:doSplit,[])
link(Text,16440180:GetData,[])
}
Add(Hub,10028629,175,63)
{
link(onEvent1,16440180:doData,[(199,69)(199,20)])
link(onEvent2,7860795:doCharset,[])
}
Add(EventFromData,16440180,210,14)
{
}
Add(ListBox,3898793,357,63)
{
Left=200
Top=30
Width=130
Height=230
Strings=#1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|
}
Add(Label,16130668,105,21)
{
Left=205
Top=10
Width=78
Height=17
Caption="Список всех id"
}
Add(ArrayEnum,9214765,371,126)
{
link(onItem,7844330:doEvent1,[])
link(Array,3898793:Array,[])
}
Add(StrMask,5311414,469,126)
{
Point(doMask)
link(onTrue,7215469:doMessage,[])
link(Str,14970901:GetData,[])
}
Add(Hub,2143801,308,77)
{
link(onEvent1,14970901:doData,[])
link(onEvent2,9214765:doEnum,[(346,90)(346,132)])
}
Add(Hub,7844330,413,126)
{
link(onEvent1,5311414:doMask,[(448,132)(448,139)])
link(onEvent2,5311414:doCompare,[(448,139)(448,132)])
}
Add(EventFromData,14970901,469,77)
{
}
Add(Message,7215469,532,133)
{
}