![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы
![]() |
Поиск в этой теме
![]() |
![]() |
#1 |
Регистрация: 23.11.2012
Сообщений: 7
|
![]()
Добрый день! Есть такой вопрос!
У меня FR 4.1.8. Я в Delphi, добавил на форму TfrxRerort (несколько штук) там создал нужные отчеты и сохранил их на диске с расширение fr3. Нужно сделать так, чтобы программа брала один из шаблонов и загружала его на просмотр. При этом требуется помещать в созданные в отчете Varibles значения из полей Delphi. Ко всему этому пользователь должен легко вызывать шаблон в программу и редактировать его (если нужно). Код программы в стадии разработки. Но уже возникают вопросы.. unit uFrtest; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, frxClass, frxDesgnCtrls, frxDesgn, ExtCtrls; type TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; frxScrollBox1: TfrxScrollBox; OpenDialog1: TOpenDialog; Button2: TButton; frxDesigner1: TfrxDesigner; RadioGroup1: TRadioGroup; frxRep1: TfrxReport; frxRep2: TfrxReport; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; r: TfrxReport; p: TfrxReportPage; m: TfrxMemoView; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); Var Str: String; begin // Выбираем отчет Try r := TfrxReport.Create(nil); r.Clear; If RadioGroup1.ItemIndex = 0 Then r.LoadFromFile('frxRep1.fr3') Else r.LoadFromFile('frxRep2.fr3'); r.ShowReport; Except on e: exception do begin Application.MessageBox(Pchar('При составлении шаблона произошла ошибка: '+e.message),'Ошибка',48); end; end; End; procedure TForm1.Button2Click(Sender: TObject); begin // Вызываем его в редактор r.DesignReport(True,False); end; end. Вопросы следующие: 1. При вызове отчета на печать "ругается" что в отчете не связаны Footer и Header. Почему и как связать ? 2. Как засунуть значения в переменные (Varibles) отчета ? Заранее спасибо.. |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
fast report | reihtmonbern | БД в Delphi | 2 | 17.06.2012 16:07 |
Работа с Fast Report отчётом из Delphi. | Leximus | Общие вопросы Delphi | 1 | 17.03.2012 00:25 |
Fast Report | Равиль2303 | Компоненты Delphi | 2 | 31.01.2011 16:21 |
Delphi 7 и Fast Report многостраничный отчет | tarakan1983 | БД в Delphi | 3 | 09.04.2010 14:58 |
Fast Report | SERG1980 | Компоненты Delphi | 0 | 15.12.2008 09:08 |