Синтаксис
function ReportBuild(AName: string): TM_Report;
Описание
Формирует отчет с именем AName. Функция ReportBuild возвращает отчет TM_Report, который в дальнейшем можно открыть для просмотра / распечатать / сохранить на клиентских ПК или на сервере / отправить по E-mail или Telegram. Доступные свойства и методы для работы с отчетом рассмотрены по ссылке.
Примеры скриптов
1. Сформировать отчет и открыть для просмотра на клиенте
var
aReport: TM_Report;
begin
aReport := ReportBuild('Мой отчет'); // строим отчет
aReport.View(GetClientName); // открываем для просмотра на клиенте, который вызвал скрипт
end.
|
2. Сформировать отчет и распечатать на клиенте
var
aReport: TM_Report;
begin
aReport := ReportBuild('Мой отчет'); // строим отчет
aReport.Print(GetClientName); // печатаем его на клиенте, который вызвал скрипт
end.
|
3. Сформировать отчет, открыть для просмотра и распечатать на клиенте
var
aReport: TM_Report;
begin
aReport := ReportBuild('Мой отчет'); // строим отчет
aReport.ViewAndPrint(GetClientName); // открываем для просмотра и печатаем на клиенте, который вызвал скрипт
end.
|
4. Сформировать отчет и открыть для просмотра на всех клиентах
var
aReport: TM_Report;
begin
aReport := ReportBuild('Мой отчет'); // строим отчет
aReport.View(SS_ALL_CLIENTS); // открываем для просмотра на всех клиентах
end.
|
5. Сформировать отчет и сохранить на клиенте в формате ".xlsx" в папке для принятых файлов
var
aReport: TM_Report;
begin
aReport := ReportBuild('Мой отчет'); // строим отчет
// сохраняем его на клиенте, который вызвал скрипт в формате ".xlsx" с добавлением к имени файла текущей даты/времени
aReport.Save(GetClientName, 'Мой отчет' + DateTimeToFileName(Now, ''), '', rfExcel2007);
end.
|
6. Сформировать отчет и сохранить на серверном ПК в формате ".docx" на диск D:\
var
aReport: TM_Report;
begin
aReport := ReportBuild('Мой отчет'); // строим отчет
aReport.Save(SS_SERVER_NAME, 'Мой отчет', 'D:\', rfWord2007); // сохраняем его на диск D:\ в файл "Мой отчет.docx" на серверном ПК
end.
|
7. Сформировать отчет и отправить его по E-mail
var
aReport: TM_Report;
aMail: TM_Mail;
begin
aReport := ReportBuild('Отчет'); // строим отчет
aMail := SendMail('Simple-Scada', 'Mail с отчетом', 'Отчет во вложении'); // создаем E-mail сообщение
aMail.AttachReport(aReport, 'Мой отчет'); // прикрепляем отчет к E-mail сообщению с именем "Мой отчет"
end.
|
8. Сформировать отчет и отправить его через Telegram
var
aReport: TM_Report;
aTelegram: TM_Telegram;
begin
aReport := ReportBuild('Отчет'); // строим отчет
aTelegram := SendTelegram(''); // создаем Telegram-сообщение
aTelegram.AttachReport(aReport, 'Мой отчет'); // прикрепляем отчет к Telegram-сообщению с именем "Мой отчет"
end.
|