摘要: uses ActiveX, ComObj; function GetWMIProperty(WMIType, WMIProperty:AnsiString):String; var Wmi, Objs, Obj:OleVariant; Enum:IEnumVariant; C:Cardinal; begin try Wmi:= CreateOleObject(An... 阅读全文
posted @ 2017-08-04 11:41 冰意 LceMeaning 阅读(1135) 评论(0) 推荐(0) 编辑