Add(MainForm,2953706,56,70)
{
link(onCreate,12839125:doData,[])
}
Add(Charset,9621626,210,84)
{
link(onCharset,6056519:doAdd,[])
}
Add(WinExec,13023946,161,70)
{
FileName="powershell"
Mode=0
Point(doConsoleExec)
Point(onConsoleResult)
link(onConsoleResult,9621626:doCharset,[])
}
Add(DoData,12839125,112,84)
{
Data=String(Get-WmiObject Win32_PnPEntity | Where Name -match 'COM\d+')
link(onEventData,13023946:doConsoleExec,[])
}
Add(Memo,6056519,266,84)
{
Left=550
Top=160
Align=5
ScrollBars=3
}
Проверялось на Windows10 64