Андрей. писал(а):
Почему-то DiskInfo странно работает в потоках:Незнаю как он у тебя работает, но у меня он ничего не выдает даже если подключен к onSyncExec
так же молчит если подключен к UDP.
хе хе все таки заставил заработать)))
#sha
Add(MainForm,10153734,10,47)
{
Left=20
Top=105
link(onCreate,4609391:doEvent1,[])
}
Add(UDP,6550112,234,5)
{
LocalPort=8888
RemotePort=9999
LocalIP="127.0.0.1"
RemoteIP="127.0.0.1"
AutoConnect=0
link(onReceive,7760830:doAdd,[])
}
Add(Edit,12844596,150,19)
{
Left=5
Top=10
Width=125
Text="doInfo"
link(onEnter,6550112:doSend,[(208,32)(208,18)])
}
Add(ListBox,7760830,290,5)
{
Left=5
Top=35
Width=125
Height=155
}
Add(UDP,11456131,157,187)
{
LocalPort=9999
RemotePort=8888
LocalIP="127.0.0.1"
RemoteIP="127.0.0.1"
AutoConnect=0
link(onReceive,12663661:doTimer,[])
}
Add(DiskInfo,12888210,339,187)
{
Point(OccupiedSpace)
Point(FreeSpace)
Point(FullSize)
link(onInfo,7764291:doData,[(403,193)(403,260)(166,260)(166,319)])
}
Add(DoData,7764291,178,313)
{
link(onEventData,11456131:doSend,[(222,319)(222,259)(145,259)(145,200)])
link(Data,12888210:DeviceID,[(184,269)(345,269)])
}
Add(Hub,4609391,80,61)
{
link(onEvent1,6550112:doOpen,[(123,67)(123,11)])
link(onEvent2,11456131:doOpen,[(134,74)(134,193)])
}
Add(Timer,12663661,269,187)
{
Interval=1
Enable=1
AutoStop=1
link(onTimer,12888210:doInfo,[])
}