Add(MainForm,14579628,210,189)
{
Width=525
Height=379
link(onCreate,5934798:doEvent1,[])
}
Add(WinExec,10373141,420,189)
{
Point(doConsoleExec)
Point(doConsoleInput)
Point(onConsoleResult)
Point(onConsoleTerminate)
Point(doConsoleTerminate)
Point(onConsoleError)
link(onConsoleResult,13500951:doCharset,[])
}
Add(Memo,14818082,525,196)
{
Left=5
Top=5
Width=505
Height=275
ScrollBars=2
link(onChange,2316414:doRead,[(569,202)(569,251)(527,251)(527,300)])
}
Add(Charset,13500951,469,196)
{
link(onCharset,14818082:doAdd,[])
}
Add(DoData,9734918,312,217)
{
Data=String(systeminfo
)
link(onEventData,10373141:doConsoleInput,[(382,223)(382,216)])
}
Add(Hub,5934798,264,203)
{
OutCount=3
link(onEvent1,2984357:doString,[])
link(onEvent2,9734918:doData,[(304,216)(304,223)])
}
Add(ArrayRW,2316414,539,294)
{
link(onRead,10464615:doText,[])
link(Array,14818082:Array,[])
link(Index,471149:Var,[(552,284)(559,284)])
}
Add(Label,10464615,595,294)
{
Left=130
Top=310
Width=4
Height=4
Caption=""
}
Add(GlobalVar,471149,553,259)
{
Name="a"
Data=Integer(14)
}
Add(Label,11483129,322,273)
{
Left=185
Top=290
Width=96
Height=17
Caption=""
}
Add(FormatStr,2984357,357,203)
{
DataCount=1
Mask="%1system32cmd.exe"
link(onFString,10373141:doConsoleExec,[])
link(Str1,6750508:WindowsDir,[])
}
Add(Dir,6750508,329,154)
{
Point(WindowsDir)
}
Разработчик
Ответов: 26170
Рейтинг: 2127
|
|||
Tad, а кто мешает сделать так
|
|||
карма: 22 |
|