Вверх ↑
Ответов: 1058
Рейтинг: 76
#1: 2011-10-04 13:29:45 ЛС | профиль | цитата
Если правильно понял

code_25347.txt
------------ Дoбавленo в 13.29:
Чет подумал и, не совсем понятно
hitman249 писал(а):
всё что есть в разделе

Возможно еще и значения нужны, в общем вот что получилось


Add(MainForm,2953706,252,189)
{
Width=684
link(onCreate,14693422:doEvent,[])
}
Add(Registry,11129523,413,189)
{
HKey=2
Key="SOFTWAREMicrosoftWindows NTCurrentVersionNetworkCards"
Point(doEnumKeys)
Point(onEnumKey)
Point(onEnumValue)
Point(doEnumValues)
link(onRead,4395295:doValue,[])
link(Key,11449140:Value,[(426,177)(388,177)(388,254)(349,254)])
link(onEnumKey,1914265:doString,[(461,202)(461,223)])
link(onEnumValue,13269037:doValue,[])
}
Add(FormatStr,1914265,476,217)
{
DataCount=1
Mask="SOFTWAREMicrosoftWindows NTCurrentVersionNetworkCards\%1"
link(onFString,5242816:doEvent1,[])
}
Add(Memory,11449140,343,210)
{
Default=String(SOFTWAREMicrosoftWindows NTCurrentVersionNetworkCards)
link(onData,11129523:doEnumValues,[])
}
Add(Hub,5242816,518,217)
{
link(onEvent1,16509002:doWork2,[(550,223)(550,111)])
link(onEvent2,11449140:doValue,[(549,230)(549,264)(331,264)(331,216)])
}
Add(FormatStr,14666167,679,189)
{
Mask="%1=
%2
"
link(onFString,16509002:doWork3,[(718,195)])
link(Str1,13269037:Value,[(685,177)(660,177)(660,244)(622,244)])
link(Str2,4395295:Value,[(692,169)(603,169)(603,233)(573,233)])
}
Add(Memory,13269037,616,203)
{
link(onData,11129523:doRead,[(657,209)(657,161)(401,161)(401,195)])
}
Add(RichEdit,15359059,735,105)
{
Left=5
Top=10
Width=660
Height=255
ScrollBars=3
}
Add(Memory,4395295,567,189)
{
link(onData,14666167:doString,[])
}
Add(Debug,14693422,301,203)
{
link(onEvent,11129523:doEnumKeys,[])
}
Add(HubEx,16509002,714,105)
{
link(onEvent,15359059:doAdd,[])
}


карма: 0

1
файлы: 1code_25347.txt [1KB] [170]
Голосовали:hitman249