AVZ 5. Руководство пользователя
×

16.40.6. function SC_GetTagName

function SC_GetTagName(AIndx : integer) : string;
 
Возвращает имя тега с индексом AIndx. Имя возвращается в верхнем регистре. Индекс -1 применяется для получения имени родительского тега. В случае задания некорректного индекса или в случае возникновении ошибки функция возвращает пустую строку.
 
Совместимость: AVZ 4.28 и выше
 
Пример:
 
var
  Res : boolean;
  i   : integer;
begin
  Res := SC_INIT(GetAVZDirectory + 'LOG\avz_sysinfo.xml');
  if Res then
    AddToLog('Загрузка и парсинг протокола выполнены успешно')
  else begin
    AddToLog('Ошибка загрузки и парсинга протокола');
    exit;
  end;
  if SC_SelectNode('AVZ\KERNELOBJ') then
    AddToLog('Тег KERNELOBJ найден')
  else begin
    AddToLog('Тег KERNELOBJ не найден');
    exit;
  end;
 
  // Запрос количества вложенных тегов
  AddToLog('SC_GetItemsCount = '+inttostr(SC_GetItemsCount));
  for i := 0 to SC_GetItemsCount - 1 do
    if SC_GetTagName(i) = 'ITEM' then
      AddToLog('['+inttostr(i)+'] File= "'+SC_GetParamVal(i, 'File', '')+'"');
end.