Функция Lic_NextAttribute |
Функция Lic_NextAttribute используется для получения списка идентификаторов атрибутов системы, указанных в лицензионном файле. Функция позиционируется на следующей записи списка.
Для получения всего списка атрибутов системы эта функция используется в сочетании с функцией Lic_FirstAttribute.
function Lic_NextAttribute( AttrName : pField; AttrValue : pField; ) : boolean;
AttrName - идентификатор атрибута системы в текущей записи списка атрибутов в лицензионном файле.
AttrValue - значение текущего атрибута.
Возвращает true, если удалось найти следующую запись. Если текущая запись оказалась последней, функция возвращает false.
#include my.vih //================================================== interface aIfc; ! Без таблиц create view as; //-------------------------------------------------- handleEvent cmInit: { flBtr := false; Lic_FirstAttribute; while Lic_NextAttribute(S, S1) do if S='MY_ATTRIBUTE' if S1='DONT_RUN' { abort; exit; } } end; end.