Форум программистов
 
Расширенный поиск
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > C++ программирование > C/C++ Базы данных
Регистрация

Восстановить пароль
Повторная активизация e-mail



Ответ
 
Опции темы
Старый 17.11.2016, 14:05   #1
19boom96
Новичок
 
Регистрация: 28.10.2016
Сообщений: 2
Репутация: 10
По умолчанию FastReport

Надо составить отчёт по запросу в кнопке.
с FastReport не был знаком до сегодняшнего вечера)
Разобрался как вывести прямым запросом из ADOQuery (но так не надо).
и так
В отчете на кнопку надо вывести данные авторизованного пользователя.
Как в DataSet передать выводимые столбцы а потом их же передать в MasterData?
Если кратко поставить вопрос, то будет так звучать.
Как кодом прописать, а не жёстко привязывая компоненты и запросы?
С жёсткой привязкой разобрался.
Теперь возник вопрос как вывести в мемо одну запись в определённом поле?

Вот что натворил
Цитата:
TfrxDataPage * DataPage;
TfrxReportPage * Page;
TfrxBand * Band;
TfrxMasterData * DataBand;
TfrxMemoView * Memo;
DataSource1->DataSet = ADOQuery3;
ADOQuery3->SQL->Clear();
ADOQuery3->SQL->Add("SELECT * FROM [Ученики] WHERE [id_ученика] = "+IntToStr(Ii)+";");
fio=AnsiString(ADOQuery3->FieldByName ["ФИО"]) ;
frxReport1->Clear(); // очищаем отчёт

//frxReport1->DataSets->Add(frxDBDataset1); // добавляем источник данных
DataPage = new TfrxDataPage(frxReport1); // добавляем страницу "данные"
Page = new TfrxReportPage(frxReport1); // добавляем страницу
Page->CreateUniqueName(); // создание уникального имени
Page->SetDefaults(); // размер бумаги, полей, ориентации по умолчанию
Page->Orientation = poLandscape; // меняем ориентацию бумаги
Band = new TfrxReportTitle(Page); // добавление report title
Band->CreateUniqueName(); // добавление report title
Band->Top = 0;
Band->Height = 20; // высота
// добавление объекта на report title
Memo = new TfrxMemoView(Band);
Memo->CreateUniqueName();

//Memo->Text = String(Ii) ;
Memo->Text = AnsiString(fio) ;
Memo->Height = 20;
Memo->Align = baWidth; // растянем на ширину Band
// добавление мастер дата
DataBand = new TfrxMasterData(Page);
DataBand->CreateUniqueName();
//DataBand->DataSet = frxDBDataset1;
// координаты не должны пересекать band
DataBand->Top = 100;
DataBand->Height = 20;
// добавление объекта на мастер дата
Memo = new TfrxMemoView(DataBand);
Memo->CreateUniqueName();
// подключение к данным
Memo->DataSet = frxDBDataset1;
Memo->DataField = "CustNo";
Memo->SetBounds(0, 0, 100, 20);

Memo->HAlign = haRight; // текст по правому краю
// frxReport1->ShowReport(true); // вывод отчёта
frxReport1 = Form2->frxReport1;
frxReport1->Preview = Form2->frxPreview1;
frxReport1->ShowReport();


ADOQuery3->ExecSQL();
ADOQuery3->Open();
19boom96 вне форума   Ответить с цитированием
Ответ



Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
fastReport 5 Владимир Викторови Помощь студентам 7 30.05.2015 13:35
Fastreport Boh99 Помощь студентам 5 13.06.2013 14:39
Конвертация отчета FastReport в PDF минуя просмоторщик FastReport a.falkone Компоненты Delphi 3 04.02.2013 06:57
FastReport MasterofCDM БД в Delphi 7 24.11.2008 14:11
FastReport dmitry Общие вопросы Delphi 3 17.01.2007 12:57




07:53.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

Покупайте на сайте www.skinon.ru уникальные чехлы и наклейки для телефонов.
купить трафик


как улучшить посещаемость, а также решения по монетизации сайтов, видео и приложений

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru