Вверх ↑
Ответов: 307
Рейтинг: 26
#1: 2023-09-20 21:18:36 ЛС | профиль | цитата
Могу предложить такое.


Add(MainForm,2953706,21,105)
{
Width=655
Height=503
}
Add(Memo,15974791,518,168)
{
Width=639
Height=444
Align=5
Color=0
Font=[MS Sans Serif,8,0,65280,1]
ScrollBars=2
}
Add(Charset,10716446,469,168)
{
Type=7
link(onCharset,15974791:doAdd,[])
}
Add(WinExec,12351678,392,168)
{
FileName="conhost.exe"
Mode=0
Point(doConsoleExec)
Point(onConsoleResult)
Point(onConsoleError)
link(onConsoleResult,5275824:doWork2,[(446,188)(446,174)])
link(onConsoleError,5275824:doWork3,[(459,195)])
}
Add(HubEx,5275824,455,168)
{
link(onEvent,10716446:doCharset,[])
}
Add(Edit,10826958,315,175)
{
Top=444
Width=639
Align=4
Text="DRIVERQUERY"
link(onEnter,12351678:doConsoleExec,[])
}

карма: 2
0