EnumServicesStatusA

function EnumServicesStatusA(

  hSCManager: SC_HANDLE;

  dwServiceType: DWORD;

  dwServiceState: DWORD;

  lpServices: LPENUM_SERVICE_STATUSA;

  cbBufSize: DWORD;

  var pcbBytesNeeded: DWORD;

  var lpServicesReturned: DWORD;

  var lpResumeHandle: DWORD

):BOOL;