Текущий архив: 2007.07.15;
Скачать: CL | DM;

Вниз

WMI   Найти похожие ветки 

← →
apic ©   (2007-02-01 07:35) [0]

При работе с WMI часто сталкиваешься с типом Enumerate в скриптах, вродебы все понятно как переделать на Delphi (ComObj, тип OLEVariant), а вот как работать с етим Enumerate , какой тип применять и как перебирать значения?

---

← →
umbra ©   (2007-02-01 10:42) [1]

Скорее всего, у него есть методы Next, Reset, Skip и Clone. В общем, посмотрите в мсдн или сдк справку по интерфейсам IEnum{что-то там}

---

← →
umbra ©   (2007-02-01 12:35) [2]

К тому же все они есть в модуле ActiveX.

---

← →
Eraser ©   (2007-02-01 21:09) [3]

> [0] apic ©   (01.02.07 07:35)

примерно так

var
 Service: ISWbemServices;
 objSet: ISWbemObjectSet;
 TempObj, ObjProcess: OleVariant;

     objSet := Service.ExecQuery("SELECT * FROM Win32_Process WHERE Name = ""Some.exe""",
       "WQL", wbemFlagReturnImmediately, nil);
     Enum := (objSet._NewEnum) as IEnumVariant;
     while (Enum.Next(1, TempObj, Value) = S_OK) do
     begin
       ObjProcess := IUnknown(tempObj) as SWBemObject;
       ObjProcess.Terminate;
     end;

---

← →
APiC ©   (2007-02-08 07:02) [4]

Спассбо за исходник!

---

Страницы: 1 вся ветка

Текущий архив: 2007.07.15;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.025 c