Вверх ↑
Ответов: 54
Рейтинг: -4
#1: 2008-06-19 16:30:17 ЛС | профиль | цитата
Получение данных о дисках и передача их через сокет
Add(UDP,6550112,238,336)
{
LocalPort=8888
RemotePort=9999
LocalIP="10.71.18.118"
RemoteIP="10.71.18.118"
AutoConnect=0
link(onReceive,7760830:doAdd,[(282,342)(282,328)])
}
Add(Edit,12844596,84,336)
{
Left=5
Top=10
Width=125
Text="doInfo"
link(onEnter,6550112:doSend,[])
}
Add(ListBox,7760830,294,322)
{
Left=5
Top=35
Width=125
Height=155
}
Add(UDP,11456131,161,518)
{
LocalPort=9999
RemotePort=8888
LocalIP="10.71.18.118"
RemoteIP="10.71.18.118"
AutoConnect=0
link(onReceive,11159379:doCase,[])
}
Add(DiskInfo,12888210,322,518)
{
Point(OccupiedSpace)
Point(FreeSpace)
Point(FullSize)
link(onInfo,7764291:doData,[(393,524)(393,591)(170,591)(170,650)])
}
Add(Case,11159379,217,518)
{
Value=String(doInfo)
link(onTrue,12888210:doInfo,[(285,531)(285,524)])
}
Add(DoData,7764291,182,644)
{
link(onEventData,11456131:doSend,[(226,650)(226,582)(153,582)(153,531)])
link(Data,12888210:DeviceID,[(188,600)(328,600)])
}
Add(Hub,4609391,84,392)
{
link(onEvent1,6550112:doOpen,[(177,398)(177,342)])
link(onEvent2,11456131:doOpen,[(138,405)(138,524)])
}
карма: 1

0