Виды решений для создания отчетов и документов

Встречайте новый релиз 2025.2 для вариантов поставок FastReport .NET: WinForms, WPF, Avalonia, Mono, WEB, Ultimate. В этом обновлении вас ждёт поддержка .NET 9, библиотека для выполнения скриптов на языке C#, плагин импорта документов из Word, коннектор к Apache Ignite, улучшения дизайнера и экспортов, а также новые функции в WebReport. Не упустите возможность обновить FastReport .NET и расширить свой функционал!     Импорт документов из Word В наборе компонентов FastReport .NET Ultimate появился плагин, который позволяет импортировать документы Microsoft Word (.docx). При открытии такого файла он преобразуется в шаблон отчета FastReport .NET (.frx). Ввиду больших отличий в форматах полное соответствие двух документов не всегда возможно. Однако, данный плагин позволяет значительно сократить время создания шаблона на основе существующего docx-файла. На данный момент наш плагин не поддерживает: подсветку фона части строки, шейпы (Shapes), а также вложенную векторную графику Vector Markup Language (VML) и OLE объекты. Об особенностях работы импорта и как подключить плагин, можно прочитать в статье. Читать статью     Поддержка .NET 9 Эта платформа повышает производительность приложений и добавляет множество новых возможностей для ваших проектов. В этом обновлении появилась поддержка .NET 9 для: FastReport .NET, FastReport.Core, FastReport.Core.Skia, FastReport.WPF, FastReport.Avalonia, FastReport.Web, FastReport.Web.Skia, FastReport.Blazor.Wasm. Мы отказались от бинарной сериализации. BinaryFormatter стал причиной целого ряда проблем с безопасностью и Microsoft в .NET 9 отказались от его использования. Наша команда также убрала класс BinaryFormatter из исходного кода. Подробнее об этом можно прочитать по этой ссылке. Узнать больше     Улучшения дизайнера отчетов Также в этой версии были внедрены несколько полезных функций, упрощающих работу с отчётами. Теперь в инспекторе объектов можно быстро копировать данные из списка свойств объекта с помощью горячих клавиш Ctrl + C. Это поможет легко переносить свойства объектов между различными частями документа или даже между разными отчётами. Кроме того, появилась возможность копировать итоги и параметры с сохранением иерархии вложенности. Это означает, что при копировании сложных структур данных их первоначальная организация будет сохранена, что позволяет избежать необходимости вручную восстанавливать структуру после копирования.     Подключение к Apache Ignite и РЕД Квант С этим обновлением был добавлен новый плагин, который значительно упрощает процесс работы с базами данных Apache Ignite и РЕД Квант при создании отчётов. Этот плагин позволяет напрямую подключать отчёты к указанным базам данных, обеспечивая удобный доступ к необходимым данным для анализа и визуализации. Коннектор Apache Ignite реализован на основе .NET Thin Client Ignite.NET. Он предоставляет возможность подключения к кластерам Apache Ignite, работы с кэшами (включая SQL-таблицы) и обработки различных типов данных. Кроме того, коннектор поддерживает подключение к одному или нескольким узлам Apache Ignite. Адреса узлов указываются в формате хост:порт и разделяются запятыми. Подключение возможно как с аутентификацией (если authenticationEnabled используется в конфигурации), так и без неё. В коннекторе поддерживается работа с кэшами, созданными как ключ-значение, так и с SQL-таблицами. Для кэшей с метаданными QueryEntity поддерживаются операции получения списка полей и их типов данных. Подробнее можно прочитать в статье. Читать статью     Улучшения окна предварительного просмотра В OutlineControl мы добавили удобные кнопки с иконками для сворачивания и разворачивания. Эти кнопки были и раньше, но без иконок. Помимо этого, были добавлены свойства, которые позволяют изменять ширину и высоту полос прокрутки в окне предварительного просмотра.     Улучшения экспортов Добавлен экспорт форматов чисел, валюты, даты, времени и процентов в OpenOffice Calc (.ods). В этом обновлении также был внедрён новый режим экспортов в виде параграфов для файлов формата OpenOffice Writer (.odt). Это упрощает редактирование сгенерированных документов и делает их более визуально понятными для человека. Новый режим экспорта не заменяет, а дополняет уже существующий режим и расширяет его возможности. Кроме того, была добавлена опция "Автоподбор ширины" для MS Excel-экспорта. Будет работать только при определенных значениях свойств текстового объекта: свойства AutoWidth и AutoShrink включены; значение свойства HorzAling любое, кроме Justify.     Изменения в WebReport   Поиск по всему отчету Добавлен поиск текста по всему отчету, аналогично десктопной версии Viewer, при нахождении слова на другой странице, просмотр будет автоматически на нее переключен. Поиск доступен в WebReport с FastReport.Core, в WebReport для Blazor Server и WebReport для Blazor Wasm. Управлять отображением кнопки поиска можно с помощью свойства: WebReport.Toolbar.ShowSearchButton = false; Цвет подсветки найденных слов можно изменить с помощью свойства: WebReport.Toolbar.SearchHighlight = Color.Red;     Улучшения в настройке кэширования для WebReport С выходом новой версии в WebReport появились дополнительные возможности для настройки кэширования. Во-первых, теперь можно задавать индивидуальные параметры кэширования для каждого конкретного экземпляра WebReport. Ранее были доступны только общие настройки, применявшиеся ко всем отчётам, что могло быть неудобно, особенно если требовалось дольше сохранять в памяти определённые отчёты. С помощью свойства webReport.CacheOptions вы можете настроить время хранения в кэше для конкретного отчёта. Во-вторых, появилась более гибкая настройка времени хранения отчёта в кэше благодаря параметрам AbsoluteExpirationDuration и AbsoluteExpiration. Ранее использовалась только опция CacheDuration, основанная на скользящем принципе: если отчёт использовался в течение заданного времени, таймер сбрасывался, и отчёт оставался в памяти. Это могло привести к тому, что отчёт никогда не удалялся из кэша. Новые параметры позволяют задать точное время, когда отчёт должен быть окончательно удалён из кэша, независимо от его использования. При этом CacheDuration и новые параметры AbsoluteExpiration и AbsoluteExpirationDuration можно использовать совместно. // Общие настройки для всех WebReport services.AddFastReport(options => { options.CacheOptions.CacheDuration = TimeSpan.FromMinutes(10); options.CacheOptions.AbsoluteExpirationDuration = TimeSpan.FromMinutes(20); });   // Индивидуальные настройки WebReport, имеющие больший приоритет webReport.CacheOptions = new WebReportCacheOptions() { CacheDuration = // ..., AbsoluteExpiration = DateTime.Now.AddMinutes(30), // или AbsoluteExpirationDuration = // ... };     Обновленное демонстрационное веб-приложение на ASP .NET Core Мы обновили наше демо-приложение на ASP .NET Core, чтобы продукт радовал вас не только своим функционалом, но и внешним видом. Обновленное приложение доступно по ссылке. Онлайн демо     Обновленное демо Online Designer Кроме того, мы обновили демо-приложение Online Designer, на котором вы сможете посмотреть больше примеров наших отчётов, экспортировать их, а также попробовать обновленный онлайн дизайнер на них. Обновленное приложение доступно по ссылке. Попробовать демо     Поддержка FastScript .NET Добавлена возможность выполнения скрипта отчета, используя FastScript .NET. FastScript .NET — это библиотека для выполнения скриптов на языке C#, которая не зависит от CodeDOM/Roslyn и может быть использована в средах, где запрещена кодогенерация (Native AOT, iOS, WASM).  FastScript .NET входит в состав следующих вариантов поставок FastReport .NET: WinForms, WPF, Avalonia, Mono, WEB, Ultimate. Для использования FastScript .NET совместно с FastReport .NET: добавьте в свое приложение ссылку на nuget пакет FastReport.Plugins.FastScript; выполните следующий код перед первым использованием объекта Report: FastReport.Code.CodeProvider.DefaultProvider = typeof(FastReport.Code.FastScript.FastScriptCodeProvider); Теперь все отчеты будут использовать FastScript .NET для вычисления выражений и выполнения кода отчета. В FastScript .NET нет поддержки языка скрипта VB.NET, а также не поддерживается тип dynamic. Некоторые отчеты, использующие объект "Улучшенная матрица", не будут работать. Подробная документация по работе с FastScript .NET доступна по этой ссылке. Онлайн документация     Полный список изменений [Engine]+ добавлен новый движок скрипта - FastScript .NET;+ добавлена поддержка вертикальной табуляции;+ добавлен импорт документов DOCX в шаблон отчёта;+ добавлена поддержка кодировки для китайского (упрощенного) языка при конвертации RTF;+ добавлена возможность отключить интеграцию с МоиОтчеты Облако;+ добавлен штрих-код GS1 Datamatrix;+ добавлено преобразование SkBitmap в Bitmap и Image в FastReport.SkiaDrawing;- исправлена ошибка с RichObject в кодировке zh-tw;- исправлена ошибка одновременной компиляции скрипта отчёта при подготовке отчётов в нескольких потоках;- исправлена ошибка при печати пустой матрицы;- исправлена ошибка передаче null значения в параметр запроса MS SQL;- исправлены ошибки при компиляции библиотек под .NET 9;- исправлена ошибка приводящая к бесконечному циклу, когда включено свойство "StartNewPage" дочернего бэнда "Заголовка страницы" или "Заголовка колонки";- исправлена ошибка приводящая к System.ArgumentException при подключении к MySQL;- исправлена ошибка вычисления выражения PrintableExpression страницы;- исправлена ошибка приводящая к System.NullReferenceException в методе Report.GetParameterValue; [Designer]+ добавлена возможность копировать данные из списка свойств объекта с помощью горячих клавиш Ctrl + C;+ добавлена возможность копировать итоги и параметры с сохранением иерархии вложенности;* в окне открытия страницы отчета осталась возможность выбрать только *.frx файл;* в настройках дизайнера Mono скрыта вкладка с недоступными настройками (Страница "Код");* изменена логика обработки стилей .rtf файла при его открытии в дизайнере;- исправлена ошибка, когда пропадало изображение PictureObject, после отмены изменений в дизайнере, при редактировании подготовленной страницы;- исправлена ошибка поискового фильтра в дереве данных, при которой сбрасывалось текущее состояние поиска;- удален пункт "Новый диалог" контекстного меню в Community версии, выбор которого приводил к необрабатываемому исключению;- исправлена ошибка при запуске просмотра отчета из дизайнера;- исправлено исключение System.InvalidOperationException при удалении столбца источника данных, если такого столбца больше нет в базе данных;- исправлено считывание штрихкода GS1 DataMatrix как DataMatrix;- исправлена ошибка с выбором размещения колонок бэнда в окне "Редактор колонок";- исправлено удаление объектов и категорий с боковой панели в дизайнере;- исправлена ошибка с отображением иконок, которая появилась с версией AvaloniaUI 11.1;- исправлена ошибка, когда при добавлении функции IsNull через "Редактор текста" добавлялась лишняя запятая; [Preview]+ добавлена кнопка для отправки отчета по электронной почте при использовании MAPI в превью в WPF;+ добавлены кнопки сворачивания и разворачивания с иконками в OutlineControl;+ добавлена возможность изменять ширину и высоту полосы прокрутки через код;- исправлена ошибка с неправильным размером бумаги для принтеров без опции "Авторазмер бумаги" при нажатии кнопок "Настройки", а затем "Дополнительно" в окне "Печать";- исправлено отключение кнопки сохранения подготовленного отчета в превью;- исправлено отключение вкладки "Хранилище" в меню сохранения отчета в предварительном просмотре;- исправлена ошибка с "Улучшенной матрицей" при отсутствие фильтров;- исправлена ошибка при которой не появлялась форма печати в превью по нажатию Ctrl + P; [Exports]+ добавлен экспорт свойства "Author" при экспорте в PDF/A;+ добавлена поддержка HTML тега неразрывного пробела при экспорте в Excel;+ добавлен экспорт форматов чисел, валюты, даты, времени и процентов в OpenOffice Calc (.ods);+ добавлена опция "Автоподбор ширины" для экспорта в MS Excel;+ добавлен новый режим экспорта по параграфам в документы OpenOffice Writer (формат .odt);* теперь при экспорте страниц со свойством ExportAlias в Excel, суффикс "-n" не будет добавляться к имени листа, если это возможно;- исправлена ошибка, когда название шрифта экспортировалось без кавычек в HTML;- исправлена ошибка в FastReport.Core с некоторыми пользовательскими шрифтами;- исправлена ошибка в HTML-экспорте при которой, не отображалась граница штрих-кода;- исправлена ошибка открытия файлов при экспорте отчета с спецсимволами в форматы ODT и ODS;- исправлено некорректное отображение и экспорт некоторых Unicode символов в Skia/Avalonia;- исправлен экспорт заливки TableObject в PDF-экспорте;- исправлен экспорт заливки TableObject и страниц в HTML-экспорте;- добавлен экспорт высоты для объединенных ячеек при экспорте в Excel; [WebReport]+ добавлен поиск по WebReport для ASP.NET;+ добавлен поиск по WebReport для Blazor WASM;+ добавлена поддержка .NET 9 для FastReport.Blazor.Wasm;+ добавлена возможность создания подключения к хранимым  процедурам в WebReport;- исправлена проблема, которая не позволяла изменить DataConnection после его создания в OnlineDesigner;- исправлено преобразование TextObject в SVG при предварительном просмотре в Blazor;- исправлена поддержка Size CommandParameter;- исправлена отрисовка кнопок переключения страниц в Blazor при их выключении;- исправлена ошибка, когда значение параметра RouteBasePath не учитывалось при настройке WebReport; [.NET Core]+ добавлен фильтр таблиц подключений;+ добавлен класс JsonConnectionType для использования в методе JsonDataConnection.GetConnectionType и методы GetConnectionType() и GetParameterType() в коннектор JsonDataConnection;- исправлена ошибка с кодировкой при подключении файла данных CSV для отчета в .NET Core; [Common]* изменена ширина окна "О программе..."; [Extras]+ добавлена возможность подключения к Apache Ignite и РЕД Квант; [Demos]+ добавлен файл UsedPackages.version для паков WPF;- исправлено название Avalonia и WPF при запуске демо приложения.  

В настоящее время форматы XML и JSON стали основными стандартами для хранения данных и обмена информацией между компьютерными системами. По просьбам пользователей в FastScript добавлены классы для работы с XML и JSON. В этой статье мы подробнее рассмотрим, как работать с этими классами, какие в них есть свойства и методы, а также построим отчеты из кода со скриптами.     Формат XML Для работы с XML в скриптах применяются 2 класса. Данные классы ориентированы на максимальное быстродействие и малое потребление памяти.   TfrXMLDocument – класс, инкапсулирующий функциональность документа XML. В нём доступны следующие свойства и методы. Свойства и методы класса Описание procedure SaveToStream(Stream: TStream); Сохраняет XML в переданном потоке. procedure LoadFromStream(Stream: TStream; AllowPartialLoading: Boolean = False); Загружает XML из переданного потока. procedure SaveToFile(const FileName: string); Сохраняет XML в файл с указанным именем. procedure LoadFromFile(const FileName: string); Загружает XML из файла с указанным именем. procedure Clear; Удаляет у дерева все узлы XML, кроме корневого. Содержимое узла при этом НЕ очищается. property Root: TfrXMLItem; Позволяет получить доступ к корневому элементу дерева. property AsText: string; Позволяет как получить, так и задать XML в виде строки (например, используя это свойство, можно передать XML в скрипт отчета с помощью переменной отчета). property AutoIndent: Boolean; Определяет, как будет генерироваться выходной XML: в виде одной строки или в виде текста с отступами.   TfrXMLNode – класс, который инкапсулирует в себе свойства узла XML документа. Создать объект данного типа напрямую нельзя. Он создается путем вызова метода Add() у элемента, к которому необходимо добавить дочерний элемент. Рассмотрим подробнее свойства и методы класса TfrXMLNode. Свойства и методы класса Описание function Add(AName:string):TfrXMLItem; Создает дочерний TfrXMLItem с заданным именем и возвращает его. procedure Clear; Очищает список дочерних элементов. procedure InsertItem(Index:integer; AItem: TfrXMLItem); Вставляет дочерний элемент в указанную позицию. Элемент может принадлежать другому документу. function Find(AName:string):Integer; Ищет в дочерних элементах TfrXMLItem с указанным именем и возвращает его. Если элемент не найден, то возвращается -1. Если элементов с заданным именем несколько, то возвращается первый из них. function FindItem(AName:string):TfrXMLItem; Ищет в дочерних элементах TfrXMLItem с указанным именем и возвращает его. Если элемент не найден, то создается и возвращается новый элемент с указанным именем. Если элементов с заданным именем несколько, то возвращается первый из них. function Root: TfrXMLItem; Возвращает корневой элемент документа. property Count:Integer; Возвращает количество дочерних узлов элемента. property Items[AIndex:Integer]: TfrXMLItem; Возвращает дочерний элемент по его индексу. property Prop[AName:string]:string; Возвращает или задает значение атрибута узла с заданным именем. property Name: string; Имя тэга элемента. property Parent: TfrXMLItem; Имя родительского элемента. У Root равно nil. property Text:string; Строка, содержащая список параметров узла в виде Name1=”Value1” Name2=”Value2”… Специальные символы в этой строке экранированы. procedure Delete(AIndex: Integer); Удаляет дочерний элемент с индексом AIndex. procedure DeleteProp(const APropName: string); Удаляет атрибут узла с заданным именем. property Value: string; Текст, который находится между открывающим и закрывающим тэгом элемента. function PropExists(APropName:string):Boolean; Помогает определить имеется ли у элемента атрибут с указанным именем. function IndexOf(AItem: TfrXMLItem):Integer; Возвращает индекс переданного элемента. function GetPropNames(ANames:TStrings); Заполняет переданный список строк именами атрибутов TfrXMLItem.   Давайте попробуем построить отчет с использованием классов для работы с XML. Для примера отобразим в отчете данные из файла «country.xml», но при этом не будем пользоваться TClientDataSet, а воспользуемся прямым доступом к файлу XML. Создаём новый отчет, переходим в режим редактирования, кладём на отчет MasterData. А сверху добавляем несколько Memo для отображения данных. Также создадим событие OnBeforePrint у объекта MasterData. Итоговый код скрипта отчета будет выглядеть так: var doc: TfrXMLDocument; item: TfrXMLItem; IIndex: Integer;   procedure MasterData1OnBeforePrint(Sender: TfrxComponent); var cur: TfrXMLItem; S: string; begin cur := item[IIndex]; mmNum.Text := cur.Prop['Code']; mmName.Text := cur.Prop['Name']; mmCapital.Text := cur.Prop['Capital']; mmArea.Text := cur.Prop['Area']; mmPopulation.Text := cur.Prop['Population']; mmContinent.Text := cur.Prop['Continent']; Inc(IIndex); end;   begin Doc := TfrXMLDocument.Create; Doc.LoadFromFile('..\..\Data\country.xml'); item := Doc.Root[1]; IIndex := 0; MasterData1.RowCount := item.count; end. Запустим отчет на выполнение. Для удобства восприятия мы также добавили заголовки столбцов.     Формат JSON Из формата XML плавно перейдём в JSON. Для работы с ним в FastReport также применяются 2 класса – это TfrJSON и TfrJSONArray. В данном случае эти классы просто обертка вокруг классов из System.JSON в Delphi платформе или аналогичных классов в Lazarus.   TfrJSONObject – класс, который инкапсулирует в себе функции для работы с объектами JSON.  Свойства и методы класса Описание function Create(const JSONstring: string); Создает объект JSON и заполняет его из переданной строки. function IsValid:Boolean; Возвращает True, если объект содержит валидный JSON. procedure LodFromFile(const AFilName:string); Загружает данные из указанного файла. Если в объекте содержались данные, то они пропадут. procedure LoadFromtStream(const AStream:TStream); Загружает данные из переданного потока. Если в объекте содержались данные, то они пропадут. function ToString:string;   Возвращает строку, содержащую текстовое представление JSON объекта. procedure SaveToFile(const AFileName: string); Сохраняет текстовое представление JSON объекта в файл. procedure SaveToStream(AStream: TStream Сохраняет текстовое представление JSON объекта в поток. function IsNameExists(const AName:string); Возвращает True, если в объекте имеется свойство с указанным именем. function IsNameValueExists(const Name, Value: string): boolean; Возвращает True, если в объекте имеется свойство с указанным именем и его значение совпадает с заданным. function Count:Integer; Возвращает общее количество свойств JSON объекта. property Names[AIndex:Integer]:string; Возвращает имя свойства с указанным индексом. Property ValueType[IndexOrName:Variant]:TfrJSONType; Возвращает тип свойства с указанным индексом или именем. Тип может быть одним из следующих значений:– jsUnknown – тип свойства неизвестен (произошла ошибка парсинга или свойство с таким индексом или именем отсутствует).– jsNumber – свойство имеет числовой тип.– jsString – свойство имеет строковый тип.– jsBoolean – свойство имеет булевский тип (true/false).– jsNull –тип свойства это null (значение не задано).– jsList – тип свойства это массив JSON.– jsObject – тип свойства это вложенный объект JSON. Свойства ниже позволяют получить в том или ином виде значения объекта JSON. Во всех этих свойствах индексирование осуществляется либо по номеру свойства в списке свойств, либо по его имени. Отметим, что AsString[‘1’] <> AsString[1]. Также, если значение свойства попробовать получить неподходящим методом, то могут возникать ошибки и возвращаться неверные значения свойств. Например, если свойство имеет тип «Объект» или «Массив», то при попытке получить его значение при помощи свойства AsString - вам вернется пустая строка. В остальных случаях AsString вернет строковое представление значения свойства. Свойства и методы класса Описание property AsObject[IndexOrName: Variant]: TfrxJSON; Позволяет получить вложенный объект JSON. property AsArray[IndexOrName: Variant]: TfrJSONArray; Позволяет получить вложенный массив JSON. Property AsString[IndexOrName: Variant]: string; Позволяет получить значение свойства в виде строки. Этот метод получения можно применять к свойствам других типов, кроме объектов и массивов. Для логических значений будет возвращена строка, содержащая значение «True» или «False». Для чисел с дробной частью в качестве разделителя дробной части всегда, независимо от региональных настроек, будет использована точка. property AsNumber[IndexOrName: Variant]: Extended; Позволяет получить значение свойства в виде числа. Если свойство имеет нечисловой тип, то вернется 0. property AsBoolean[IndexOrName: Variant]: Boolean; Позволяет получить значение свойства в виде логического значения. Если свойство имеет другой тип, то вернется False.  Чтобы вернуть поле типа null вам придётся немного постараться. Вообще такого метода нет. Однако можно воспользоваться свойством ValueType, которое для поля типа null вернет jsNull, либо воспользоваться свойством AsString, которое вернет строку ‘null’. Рассмотрим подробнее методы для манипуляций со свойствами объекта. Методы класса Описание Procedure Delete(AName: String);   Удаление свойство объекта с указанным именем. function AddObject(const AName: string): Integer Добавляет в объект дочерний пустой объект с указанным именем. function AddArray(const AName: string): Integer; Добавляет в объект пустой массив с указанным именем. function AddString(const AName, AValue: string): Integer; Добавляет в объект строку с указанным именем. function AddBool(const AName: string; AValue: boolean): Integer; Добавляет в объект логическое значение с указанным именем. function AddNumber(const AName: string; AValue:Extended): Integer; Добавляет в объект числовое вещественное значение с указанным именем. function AddInteger(const AName: string; AValue:Integer): Integer; Добавляет в объект числовое целое значение с указанным именем. function AddNull(const AName: string): Integer; Добавляет в объект значение null с указанным именем. Методы возвращают целое число, которое является индексом добавленного элемента в списке всех полей. Все методы, добавляющие поля в объект, не контролируют наличие существующих полей с такими же именами. Данная процедура возложена на программиста, использующего данный класс. Такой контроль необходим, чтобы в выходном JSON не появлялись несколько полей с одинаковыми именами. Поведение системы в таком случае не определено – это зависит от парсера, который далее будет разбирать полученный JSON. Это значит, что в работе может оказаться любое из значений с одинаковыми именами!  Класс TJSONArray инкапсулирует в себе методы и свойства для работы с массивами JSON. В принципе, основные свойства те же, однако обращаться к ним можно только лишь по индексу. Поддерживаются только операции доступа к любому элементу, получение его значения, удаление любого элемента. Перемещать элементы по массиву, изменить их тип нельзя. Рассмотрим свойства и методы для получения значений элементов в этом классе. Свойства и методы класса Описание function Count:Integer; Возвращает количество элементов массива. property ValueType[AIndex: Integer]: TfrJSONType; Возвращает тип элемента массива с заданным индексом. property AsObject[AIndex: Integer]: TfrJSONObject; Возвращает объект, дающий доступ к элементу массива как к объекту JSON. Property AsArray[AIndex: Integer]: TfrJSONArray Возвращает объект, дающий доступ к элементу массива как к массиву JSON. property AsString[AIndex: Integer]: string; Возвращает значение элемента массива как строку. property AsNumber[AIndex: Integer]: Extended; Возвращает значение элемента массива как число. property AsBoolean[AIndex: Integer]: Boolean; Возвращает значение элемента массива как логическое значение. Как и в объекте надо внимательно подходить к извлечению значений элементов массива. В зависимости от типа значения следует использовать соответствующий метод для его получения. Ниже описаны методы для манипуляции элементами JSON массива. Свойства и методы класса Описание procedure Delete(AIndex:Integer); Удаление элемента массива c указанным индексом. function AddObject: Integer; Добавляет вложенный JSON объект в конец массива. function AddArray: Integer; Добавляет вложенный JSON массив в конец массива. function AddString(const AValue: string): Integer; Добавляет строку в конец массива. function AddBool(AValue: boolean): Integer; Добавляет логическое значение в конец массива. function AddNumber(AValue:Extended): Integer; Добавляет вещественное число в конец массива. function AddInteger(AValue: Integer): Integer; Добавляет целое число в конец массива. function AddNull: Integer; Добавляет null в конец массива. Все эти методы возвращают позицию элемента, добавленного в массив. В середину массива вставить элемент нельзя – это ограничение базовых классов в System.JSON.     Особенности использования классов для доступа JSON При использовании объектов следует учесть, что после использования объектов-оберток все их необходимо удалять из кода.  Обратите внимание, что если вы хотите получить какой-то дочерний объект или массив, а там вместо него находится скалярное значение или вообще значения нет, то свойство вернет nil, и при дальнейшем обращении к такому свойству возникнет исключение. Не стоит использовать методы, которые не предназначены для работы со значениями определённых типов, хранящимися в элементе, чтобы получить эти значения.  Также следует учесть, что имена свойств объектов чувствительны к регистру, т.е. «Item1» и «item1» — это разные имена! Можно задавать значения элементам объектов, только если тип этих значений соответствует типу, который задан у элемента. Если вам надо переопределить тип элемента, то удалите его и добавьте новый с таким же именем и нужным вам типом. Ввод новых значений у элементов массивов невозможно. Необходимо удалить массив JSON и потом создать его заново с нужными вам значениями. Давайте воспользуемся классами из описания выше, и напишем скрипт, который извлекает данные (без информации о типах) из XML файла и помещает их в объект JSON. procedure XMLToJSON; var XML: TfrXMLDocument; xi, xi1: TfrXMLItem; I, J: Integer; JO: TfrJSONObject; JA, JA1: TfrJSONArray; SL: TStringList; begin XML:=TfrXMLDocument.Create; XML.LoadFromFile('.\..\..\data\country.xml'); JO:=TfrJSONObject.Create('{}'); JO.AddArray('data'); JA:=JO.AsArray['data']; xi:=X.Root[1]; xi1:=xi.Items[0]; SL:=TStringList.Create; xi1.GetParamNames(SL); for I:=0 to xi.Count - 1 do begin xi1:=xi.Items[I]; JA1:=JA.AsArray[JA.AddArray]; for J:=0 to SL.Count-1 do JA1.AddString(xi1.Prop[SL[J]]); JA1.Free; end; JA.Free; JO.SaveToFile('.\..\..\data\country.json'); JO.Free; SL.Free; end; И попробуем на основании полученных данных построить отчет (предварительно положите на страницу отчета соответствующие компоненты MasterData и Memo): var J:TfrJSONObject; A:TfrJSONArray; curr:Integer;   procedure MasterData1OnBeforePrint(Sender: TfrxComponent); var A1:TfrJSONArray; begin A1:=A.AsArray(curr); Memo1.Memo.Text:=A1.AsString[0]; Memo2.Memo.Text:=A1.AsString[1]; Memo3.Memo.Text:=A1.AsString[2]; Memo4.Memo.Text:=A1.AsString[3]; Memo5.Memo.Text:=A1.AsString[4]; Memo6.Memo.Text:=A1.AsString[5]; A1.Free; curr := curr + 1; end;   begin J:=TfrJSONObject.Create(''); J.LoadFromFile('.\..\..\data\country.json'); A:=J.AsArray[0]; MasterData1.RowCount:=A.Count; curr:=0; end.   Вы также можете использовать эти объекты и в коде Delphi – достаточно подключить модули frXML и frJSON в операторе uses.      Заключение В данной статье мы изучили применение классов для работы с JSON и XML в FastReport. Если вы занимаетесь разработкой, и не только отчетов, и в Delphi, и в Lazarus, то применение этих классов позволит уменьшить проблемы при переходе от одной среды к другой – в обоих IDE поведение будет одно и тоже.  Для вашего удобства мы приложили к статье два примера, иллюстрирующие построение отчетов на основе XML и JSON. Их можно открыть запускать сразу в FastReportDemo, входящем в состав поставки FastReport. Возможно, перед запуском отчеты придется настроить – указать правильный путь к файлу данных «country.xml» - он находится как в составе DemoCenter, так и в папке с примерами.  Скачать примеры