Add(MainForm,2953706,266,84)
{
 Width=710
 Height=422
 link(onCreate,14704103:doEvent1,[])
}
Add(Memo,14210464,532,168)
{
 Left=20
 Top=10
 Width=640
 Height=370
 ScrollBars=3
}
Add(Charset,11395080,455,168)
{
 link(onCharset,14210464:doAdd,[])
}
Add(WinExec,7639298,399,154)
{
 FileName="Diskpart.exe"
 Param="list disk"
 Point(doConsoleExec)
 Point(onConsoleResult)
 link(Params,16202321:Item,[])
 link(onConsoleResult,11395080:doCharset,[])
}
Add(Hub,14704103,329,98)
{
 link(onEvent1,16202321:doEnum,[(375,104)(375,111)])
 link(onEvent2,7639298:doConsoleExec,[(375,111)(375,174)])
}
Add(ArrayEnum,16202321,406,105)
{
 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)
}