Вверх ↑
Ответов: 189
Рейтинг: 5
#1: 2019-02-07 16:48:12 ЛС | профиль | цитата
Походу я все таки туповат-не получается.

Add(MainForm,2953706,266,84)
{
Width=710
Height=422
link(onCreate,14704103:doEvent1,[])
}
Add(Memo,14210464,532,168)
{
Left=20
Top=50
Width=640
Height=330
ScrollBars=3
}
Add(Charset,11395080,455,168)
{
link(onCharset,14210464:doAdd,[])
}
Add(WinExec,7639298,399,154)
{
FileName="Diskpart.exe"
Point(doConsoleExec)
Point(onConsoleResult)
Point(doConsoleInput)
link(onConsoleResult,11395080:doCharset,[])
}
Add(Hub,14704103,329,98)
{
link(onEvent1,7639298:doConsoleExec,[(371,104)(371,174)])
}
Add(ArrayEnum,16202321,406,105)
{
link(onItem,7639298:doConsoleInput,[(450,111)(450,146)(387,146)(387,181)])
link(Array,15792275:Array,[])
}
Add(Memo,15792275,392,56)
{
Left=675
Top=40
Width=75
Height=220
Font=[Lucida Console,8,0,0,204]
Strings=#9:list disk|
ScrollBars=3
ReadOnly=0
Point(Position)
Point(onShow)
}
Add(Button,14586320,322,63)
{
Left=200
Top=20
Width=255
link(onClick,16202321:doEnum,[(380,69)(380,111)])
}

карма: 0

0