Как в delphi обратиться к объектам.
То есть код на VBscript
sub doWork(dt,ind)
Set objWMIService = GetObject("winmgmts:\.
ootcimv2")
Set colMBs = objWMIService.ExecQuery("Select * from Win32_BaseBoard")
For Each objMB in colMBs
sys.onCount(objMB.Manufacturer)
next
end sub
Как это будет выглядить в Delphi.
Ответов: 10
Рейтинг: 0
|
|||
карма: 1 |
|