XMLDOCUMENT

Материал из Фабиус wiki
Перейти к: навигация, поиск

XMLDocument - это функция, описанная в файле QrAddFn2.pas

XMLDocument( xmlfile )

Чтение XML файла

Полный текст функции

type
  TQrEvXMLDocument=class(TQREvElementFunction)
  public
    function Calculate: TQREvResult; override;
  end;
function TQrEvXMLDocument.Calculate: TQREvResult;
begin
  Result := NilValue;
  if (ArgList.Count >= 1) and (Argument(0).Kind = ResString) then
    begin
      Result.Kind := ResObject;
      Result.ObjResult:=TXMLDocument.Create(Application);
      TXMLDocument(Result.ObjResult).LoadFromFile(Argument(0).StrResult);
    end;
end;

Смотрите также

XMLNode