Nickname писал(а): Если всё ещё нужен вариант, который даёт 100% совпадение с Windows Task Manager без лишних заморочек, то вот:
Конечно нужен! Спасибо за участие!
Вот только не работает схемка. При выполнени консольной программы, пишет: "Выполняется выход, подождите... Ошибка: Счетчики не указаны."
Код:
Add(MainForm,13860630,413,126) { Width=880 Height=356 Color=16777215 Caption="CPU Load example" Position=1 link(onCreate,2552280:doGetCPULoad,[]) } Add(MultiElementEx,2552280,518,140) { @Hint=#8:CPU load| link(onCPULoad,9444309:doEvent1,[]) link(onConsoleResult,15939257:doAdd,[(570,153)(570,279)]) } BEGIN_SDK Add(EditMultiEx,15675124,21,21) { WorkCount=#12:doGetCPULoad| EventCount=#9:onCPULoad|15:onConsoleResult| Width=510 VOffset=70 HOffset=70 link(doGetCPULoad,1927317:doConsoleExec,[]) } Add(WinExec,1927317,77,77) { Param=""\processor(_total)\% processor time"" FileName="typeperf.exe" Point(onConsoleResult) Point(doConsoleExec) Point(doConsoleInput) link(onConsoleResult,7023306:doEvent1,[]) } Add(MultiStrData,9823270,301,77) { Char="," link(onPart2,3365561:doReplace,[]) } Add(Replace,3365561,364,84) { SubStr=""" link(onReplace,15675124:onCPULoad,[(464,90)(464,97)]) } Add(Charset,9965899,238,133) { link(onCharset,15675124:onConsoleResult,[(400,139)(400,104)]) } Add(Hub,7023306,196,84) { link(onEvent1,9823270:doSplit,[(256,90)(256,83)]) link(onEvent2,9965899:doCharset,[(224,97)(224,139)]) } END_SDK Add(Hub,9444309,581,140) { link(onEvent1,13860630:doCaption,[(615,146)(615,119)(400,119)(400,132)]) link(onEvent2,8433474:doAdd,[]) } Add(Grapher,8433474,630,147) { Left=5 Top=5 Width=495 Height=315 Step=0.5 MaxValues=60 } Add(Memo,15939257,665,273) { Left=505 Top=10 Width=340 Height=295 ScrollBars=3 }
|