[Zorkov Igor]

Код:

var
  LastError: DWORD;
begin
  VD_QueryDriverState(LastError);

  case LastError of
    ERROR_SERVICE_DOES_NOT_EXIST: Caption:= 'ERROR_SERVICE_DOES_NOT_EXIST';
    ERROR_SERVICE_DISABLED
    ERROR_SERVICE_NOT_ACTIVE
    ERROR_SERVICE_EXISTS
    ERROR_SERVICE_NOT_FOUND
    ERROR_SERVICE_MARKED_FOR_DELETE
    и т.д.
  end;