• From: Нефтеюганск
  • Registered: 2018-04-11
  • Posts: 1,775

Topic: отчет

как скриптом зделать это::



1.. открыть (нужный мне)  файл отчета в дезайнере отчета  через  кнопку отчет SQL (для редактирования)  ..
2.. просто открыть дизайн отчета через  кнопку отчет SQL
3.. создать PDF  из выбронного файла отчета
4.. открыть в просмоторщике (нужный мне)  файл отчета (перед печатью)

события происходят при выборе пункта меню

обработчики событий для отчетов  строки  306 -343.....

Post's attachments

Attachment icon MainMenu.rar 14.57 kb, 614 downloads since 2018-11-07 

  • Registered: 2014-02-14
  • Posts: 10,294

Re: отчет

1. С помощью кнопки SQL отчет к сожалению нельзя, но без кнопки можно с помощью скрипта, можете посмотреть данный пример
http://myvisualdatabase.com/forum/misc. … download=1


2. В настройках кнопки укажите, что необходимо открыть дизайнер отчета, далее просто кликните на нее с помощью скрипта Form1.Button1.Click;


либо скриптом задайте пустое имя файла, т.о. откроется дизайнер отчета

    Form1.Button1.dbReportFile :='';
    Form1.Button1.Click;

3. Посмотрите данный пример
http://myvisualdatabase.com/forum/misc. … download=1


4. Вы можете указать, какой файт отчета использовать Form1.Button1.dbReportFile :='report.fr3';

Dmitry.
  • From: Нефтеюганск
  • Registered: 2018-04-11
  • Posts: 1,775

Re: отчет

возник вопрос

у меня несколько таблиц со связанной информацией передаю их в дизайнер отчета  так

    SQLQuery('SELECT id AS "Индитификатор клиента",id_clCompanyOrApp AS "Индитификатор типа заказа",'+
    'id_company AS "Индитификатор организации",id_status AS "Индитификатор статуса оборудования",'+
    'id_TypeOfEquipment AS "Индитификатор типа оборудования",id_Manufacturer AS "Индитификатор бренда оборудования",'+
    'firstNameClient AS "Имя клиента", twoNameClient AS "Фамилия клиента", lastNameClient  AS "Отчество клиента" ,'+
    'adresClient AS "Адрес клиента", passportNamberClient AS "Серия паспорта клиента", passportSeriesClient AS "Номер паспорта клиента",'+
    'serialNamber AS "Серийный номер оборудования" ,descriptionATCsWords AS "Описание неисправности",externalStatus AS "Внешний вид",'+
    'model AS "Модель оборудования",dateInServise AS "Дата поступления",equipment AS "Комплектация",'+
    'diagnostics AS "Описание диагностики",dateApplcation AS "Дата ожидания мастера",timeApplication AS "Время ожидания мастера",'+
    'warranty AS "Гарантийный ДА/НЕТ",onlyDiiagnostics AS "Только диагностика ДА/НЕТ"   FROM servise', servise);
    SQLQuery('SELECT id_servise AS "Индитификатор оборудования", priceWorkOff AS "Цена",klVoWorkOff AS "Колличество",nameWorkOff AS "Наименование" FROM listWorkOff', listWorkOff);
    SQLQuery('SELECT nameTypeOfEquipment "Тип оборудования" FROM TypeOfEquipment', TypeOfEquipment);
    SQLQuery('SELECT nameManufacturer AS "Бренд оборудования" FROM Manufacturer', Manufacturer);

а вот и вопрос

если пользователь решит использовать информацию из разных таблиц то данные совпадут?
или нужно одним запросом передать все данные в дизайнер отчета с объединением всех таблиц?