Add(MainForm,2953706,63,98)
{
 Width=503
 Height=333
 Caption="Сервер"
 link(onCreate,14383918:doEvent1,[])
}
Add(Label,9985438,280,112)
{
 Left=8
 Top=8
 Width=92
 Height=17
 Caption="IPадрес сервера:"
}
Add(Hub,14383918,126,112)
{
 link(onEvent1,11190306:doStrCat,[])
 link(onEvent2,5096279:doOpen,[(175,125)(175,174)])
}
Add(Host,7890437,210,63)
{
}
Add(StrCat,11190306,210,112)
{
 Str1="IPадрес сервера: "
 link(onStrCat,9985438:doText,[])
 link(Str2,7890437:LoacalIP,[])
}
Add(TCP_Server,5096279,210,168)
{
 Port=1234
 link(onRead,12181092:doEvent1,[(349,174)(349,398)])
 link(onConnect,9805170:doString,[(268,181)(268,216)(183,216)(183,244)])
 link(onDisconnect,10180613:doString,[(258,188)(258,222)(175,222)(175,293)])
}
Add(StringTable,14927579,392,392)
{
 Left=7
 Top=30
 Width=470
 Height=235
 Columns=#8:Время=50|5:От=80|7:Чат=320|
}
Add(FormatStr,9329205,203,406)
{
 DataCount=3
 Mask="%1;%2;%3"
 Point(FString)
 link(onFString,12888065:doEvent1,[])
 link(Str1,14679413:Var2,[(209,394)(125,394)])
 link(Str2,14681806:Text,[])
 link(Str3,12425388:Text,[(223,393)(258,393)])
}
Add(Edit,12425388,252,334)
{
 Left=7
 Top=270
 Width=470
 Text=""
 link(onEnter,9329205:doString,[(296,347)(296,387)(191,387)(191,412)])
}
Add(Label,3516053,280,63)
{
 Left=223
 Top=8
 Width=51
 Height=17
 Caption="Моё имя:"
}
Add(Edit,14681806,210,334)
{
 Left=275
 Top=5
 Width=200
 Text="Сервер"
}
Add(Time,2309125,119,175)
{
 Format="h:m:s"
 Point(DateTime)
 Point(Minute)
}
Add(Hub,12888065,280,406)
{
 link(onEvent1,5096279:doSend,[(306,412)(306,208)(198,208)(198,188)])
 link(onEvent2,12181092:doEvent4,[])
}
Add(Hub,12181092,357,392)
{
 InCount=4
 OutCount=1
 link(onEvent1,14927579:doAdd,[])
}
Add(FormatStr,9805170,210,238)
{
 Mask="%2;;Подключение с IP:%1"
 Point(FString)
 link(onFString,12181092:doEvent2,[(340,244)(340,405)])
 link(Str2,9699227:Var3,[(223,229)])
}
Add(FormatStr,10180613,210,287)
{
 Mask="%2;;Отключился IP:%1"
 Point(FString)
 link(onFString,12181092:doEvent3,[(331,293)(331,412)])
 link(Str2,14679413:Var3,[(223,278)])
}
Add(GetDataEx,9699227,119,224)
{
 link(Data,2309125:FormatTime,[])
}
Add(GetDataEx,14679413,119,273)
{
 link(Data,9699227:Var2,[])
}

Add(MainForm,9293894,91,175)
{
 Width=503
 Height=333
 Caption="Клиент"
 link(onCreate,14383918:doEvent1,[])
}
Add(Label,9985438,154,140)
{
 Left=8
 Top=8
 Width=92
 Height=17
 Caption="IPадрес сервера:"
}
Add(Hub,14383918,161,189)
{
 InCount=2
 OutCount=1
 link(onEvent1,14726200:doTimer,[])
}
Add(StringTable,14927579,378,343)
{
 Left=7
 Top=30
 Width=470
 Height=235
 Columns=#8:Время=50|5:От=80|7:Чат=320|
}
Add(FormatStr,9329205,210,343)
{
 DataCount=3
 Mask="%1;%2;%3"
 Point(FString)
 link(onFString,12888065:doEvent1,[])
 link(Str1,2309125:FormatTime,[(216,331)(181,331)])
 link(Str2,14681806:Text,[])
 link(Str3,12425388:Text,[(230,330)(265,330)])
}
Add(Edit,12425388,259,271)
{
 Left=7
 Top=270
 Width=470
 Text=""
 link(onEnter,9329205:doString,[(299,284)(299,324)(198,324)(198,349)])
}
Add(Label,3516053,203,140)
{
 Left=223
 Top=8
 Width=51
 Height=17
 Caption="Моё имя:"
}
Add(Edit,14681806,217,271)
{
 Left=275
 Top=5
 Width=200
 Text="Клиент"
}
Add(Time,2309125,175,273)
{
 Format="h:m:s"
 Point(DateTime)
 Point(Minute)
}
Add(Hub,12888065,287,343)
{
 link(onEvent1,12181092:doEvent1,[])
 link(onEvent2,10988581:doSend,[(323,356)(323,257)(247,257)(247,209)])
}
Add(Hub,12181092,343,343)
{
 InCount=2
 OutCount=1
 link(onEvent1,14927579:doAdd,[])
}
Add(Edit,312182,259,140)
{
 Left=100
 Top=5
 Width=115
 Text="127.0.0.1"
}
Add(Timer,14726200,203,189)
{
 Interval=3000
 Enable=1
 link(onTimer,10988581:doOpen,[])
}
Add(TCP_Client,10988581,259,189)
{
 Port=1234
 link(onRead,12181092:doEvent2,[(330,195)(330,356)])
 link(onConnect,14726200:doStop,[(313,202)(313,237)(191,237)(191,202)])
 link(onDisconnect,14383918:doEvent2,[(303,209)(303,247)(144,247)(144,202)])
 link(IP,312182:Text,[])
}