_PDH_COUNTER_INFO_A

type _PDH_COUNTER_INFO_A = record

  dwLength: DWORD;

  dwType: DWORD;

  CVersion: DWORD;

  CStatus: DWORD;

  lScale: LONG;

  lDefaultScale: LONG;

  dwUserData: DWORD_PTR;

  dwQueryUserData: DWORD_PTR;

  szFullPath: LPSTR;

  Union: record

    case LongInt of

      1: (

          DataItemPath: PDH_DATA_ITEM_PATH_ELEMENTS_A;

        );

      2: (

          CounterPath: PDH_COUNTER_PATH_ELEMENTS_A;

        );

      3: (

          szMachineName: LPSTR;

          szObjectName: LPSTR;

          szInstanceName: LPSTR;

          szParentInstance: LPSTR;

          dwInstanceIndex: DWORD;

          szCounterName: LPSTR;

        );

  end;

  szExplainText: LPSTR;

  DataBuffer: array [0..0] of DWORD;

end;