Процедура формирует указанный отчет и сохраняет его в указанном файле.
Синтаксис | ||
SaveReportToFile(ReportName: String; FileName: String) | ||
Входные параметры | ||
Имя параметра | Тип параметра | Описание |
ReportName | String | Имя отчета |
FileName | String | Путь к файлу для сохранения отчета |
Var nameReport, nameFile, s: String; Begin nameReport := 'Отчеты\Отчет пресса №4'; nameFile := 'c:\отчет_04_07_2020.pdf'; if not FileExists(nameFile) then begin SaveReportToFile(nameReport, nameFile); s := 'Запись отчета произведена успешно!'; end else s := 'Файл с указанным именем уже существует.' + #10 + 'Запись отчета не произведена.'; WriteValue('Virtual channel 99', s); end. |