Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi WMI Problem (https://www.delphipraxis.net/146102-wmi-problem.html)

nanix 13. Jan 2010 13:44


WMI Problem
 
Hello

i have problem with dynamic WMI classes such as counters.Becouse i can normaly write these classes to a dynamic array.

But what to do when they change.Give me some direction how to solve this i use this code now.

I use himitsu WMI component.Thanks

Delphi-Quellcode:
DynamicInf : array[0..9] of string =
(
'PerfFormattedData_PerfDisk_LogicalDisk',
'PerfFormattedData_PerfDisk_PhysicalDisk',
'PerfFormattedData_PerfOS_Cache',
'PerfFormattedData_PerfOS_Memory',
'PerfFormattedData_PerfOS_Objects',
'PerfFormattedData_PerfOS_PagingFile',
'PerfFormattedData_PerfOS_Processor',
'PerfFormattedData_PerfOS_System',
'PerfFormattedData_PerfProc_Process',
'PerfFormattedData_PerfProc_Thread'
     ) ;
 
  type
  propertys=record
    index:integer;
    name:string;
    Value:String;
  end;

  type
  instance=record
    Index:Integer;
    name:string;
    Propertys: array of Propertys;

  end;

 type
 WMIClass= record
  index:integer;
  name:string;
  Instances:array of instance;
 end;



var
  wmi_class:array of WMIClass;


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:08 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz