Add(MainForm,7696190,231,133)
{
Left=20
Top=105
link(onCreate,4345126:doOpen,[(331,153)(331,195)])
}
Add(Button,13254290,287,119)
{
Left=10
Top=10
Data=String()
link(onClick,4345126:doSendTo,[(359,125)(359,223)])
}
Add(Memo,13733955,462,175)
{
Left=75
Top=45
Width=280
Height=200
ScrollBars=2
}
Add(Memory,14492679,546,91)
{
Default=String(M-SEARCH * HTTP/1.1\r\nHost:239.255.255.250:1900\r\nST:upnp:rootdevice\r\nMan:"ssdp:discover"\r\nMX:3\r\n\r\n)
}
Add(UDP,4345126,399,189)
{
LocalPort=1901
RemotePort=1900
LocalIP="0"
RemoteIP="239.255.255.250"
BroadCast=0
Point(doSendTo)
link(onReceive,13733955:doAdd,[(447,195)(447,181)])
link(Data,14492679:Value,[(405,156)(552,156)])
}
Ответов: 21
Рейтинг: 0
|
|||
Спасибо, nesco! Твой код не сработал, но вот так все заработало:
|
|||
карма: 0 |
| ||
файлы: 1 | code_36888.txt [719B] [250] |