Вверх ↑
Ответов: 698
Рейтинг: 143
#1: 2021-09-26 12:54:12 ЛС | профиль | цитата
envoy_sky писал(а):
Работает с глюками

А так?
Add(MainForm,1998830,315,175)
{
Width=504
Height=83
}
Add(Button,15347235,371,175)
{
Left=12
Top=10
Width=75
Caption="Порты"
link(onClick,13023946:doConsoleExec,[])
}
Add(ComboBox,861826,497,154)
{
Left=110
Top=9
Width=363
Height=21
Text=""
DataType=1
ReadOnly=0
}
Add(WinExec,13023946,434,161)
{
FileName="powershell"
Param="-nologo -noprofile -command "& {(Get-PnpDevice -PresentOnly -Class 'Ports').Name }""
Mode=0
Point(doConsoleExec)
Point(onConsoleResult)
link(onConsoleResult,861826:doText,[])
}


--- Добавлено в 2021-09-26 13:01:23

Add(MainForm,1998830,301,175)
{
Width=504
Height=83
}
Add(Button,15347235,357,175)
{
Left=12
Top=10
Width=75
Caption="Порты"
link(onClick,13023946:doConsoleExec,[])
}
Add(ComboBox,861826,483,154)
{
Left=110
Top=9
Width=363
Height=21
Text=""
DataType=1
ReadOnly=0
link(onClick,15123142:doSearch,[])
}
Add(WinExec,13023946,420,161)
{
FileName="powershell"
Param="-nologo -noprofile -command "& {(Get-PnpDevice -PresentOnly -Class 'Ports').Name }""
Mode=0
Point(doConsoleExec)
Point(onConsoleResult)
link(onConsoleResult,861826:doText,[])
}
Add(Debug,10118881,595,161)
{
LogCount=100
}
Add(BlockFind,15123142,539,161)
{
IncludeBlock=1
StartBlock="("
EndBlock=")"
link(onSearch,10118881:doEvent,[])
}


Чуть изменил 2 схему.
карма: 15

0
Редактировалось 2 раз(а), последний 2021-09-26 13:19:04