Скачать: CL | DM;

(Работа с ADO) Kак организовать создание отчёта (НЕ таблицу)?   Найти похожие ветки 

← →
Guriev   (2008-01-30 12:49) [0]

Подскажите, пожалуйста - как организовать создание отчёта (НЕ таблицу)? Т.е. - есть БД (ADO), при двойном щелчке по строчке, открывается форма с подробной информацией по записи. Как, соответственно, отправить на печать содержимое данной формы (ОДНОЙ записи из БД), а не из всей таблицы БД?

---

← →
Palladin ©   (2008-01-30 12:51) [1]

Форма.Print;

---

← →
clickmaker ©   (2008-01-30 12:52) [2]

> Как, соответственно, отправить на печать содержимое данной
> формы

разные способы есть.
Можно просто через объект Printer:
Printer.BeginDoc;
for i := 0 to Form.ControlCount do
begin
 if (Form.Controls[i] is TLabel) then
   выводим текст метка на Printer.Canvas
 else if (Form.Controls[i] is TEdit) then
   выводим текст поля на Printer.Canvas
end;
Printer.EndDoc;

можно через QuickReport, к примеру

---

← →
Guriev   (2008-01-30 12:56) [3]

Спасибо! А если ситуации более сложная: главная таблица + подчинённая?
Как бы сделать так, чтобы сверху распечаталась наша запись из "подробной" формы, а снизу (продолжение) - уже данные по этой записи из подчинённой?

---

← →
Guriev   (2008-01-30 12:58) [4]

Схема работы:
ADOConnection --> ADOQuery --> форма...

---

← →
clickmaker ©   (2008-01-30 13:03) [5]

> Как бы сделать так, чтобы сверху распечаталась наша запись
> из "подробной" формы, а снизу (продолжение)

2 Query - master-detail
можно QuickReport для печати юзать, там есть Header / Detail bands

---

← →
Guriev   (2008-01-30 13:14) [6]

> 2 Query - master-detail
можно QuickReport для печати юзать, там есть Header / Detail bands

буду благодарен, если подскажешь - где найти пример использования этого!

---

← →
Anatoly Podgoretsky ©   (2008-01-30 13:21) [7]

> Guriev  (30.01.2008 13:14:06)  [6]

Пример лежит на твоем диске в демос.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c