Add(MainForm,12499375,399,63)
{
 Width=734
 Height=617
 link(onCreate,8225881:doConsoleExec,[(515,83)(515,118)])
}
Add(Memo,5820705,665,105)
{
 Left=10
 Top=10
 Width=695
 Height=525
}
Add(WinExec,8225881,525,98)
{
 FileName="CMD"
 Point(onConsoleResult)
 Point(onConsoleError)
 Point(doConsoleExec)
 Point(doConsoleInput)
 link(onConsoleResult,5275024:doCharset,[])
}
Add(Edit,3007897,399,112)
{
 Left=10
 Top=545
 Width=695
 Text="ping www.ru"
 link(onEnter,13958732:doStrCat,[])
}
Add(StrCat,13958732,455,119)
{
 Str2="
"
 link(onStrCat,8225881:doConsoleInput,[])
}
Add(Charset,5275024,595,105)
{
 link(onCharset,5820705:doAdd,[])
}