Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Базы данных и репортинг > Передать данные из Edit

Автор: former 29.12.2006, 20:12

Как передать данные из Edit-а или Label-а в отчёт, выполненный с помощью Fastreport 2.47.

Автор: Romikgy 29.12.2006, 20:27

edit.Text
label.Caption

Автор: former 29.12.2006, 20:35

Это понятно. А в отчёт как этот текст передать?

Автор: Romikgy 29.12.2006, 20:49

Как создаешь отчет так и передаешь

Автор: former 29.12.2006, 20:56

Цитата

Romikgy: Как создаешь отчет так и передаешь

Romikgy, ты шутник что-ли?

Отчёт создан заранее.

Автор: Beltar 29.12.2006, 21:06

А зачем в Репорт (любой) передавать данные с лейблов?? Там д/б свой элемент для статичного текста. Или FastReport чем-то отличается от прочих отчетов?

Автор: former 30.12.2006, 00:28

Beltar, отличается. Я уже разобрался. Посмотри ниже. Оказывается такая тема уже была. Просто я опубликовал тему в общих вопросах, а потом её перенесли.

Автор: Winprogrammer 14.1.2007, 20:11

Посмотри хелп этих отчетов. Там точно есть. В конце концов там есть Demos.

Код


procedure TForm1.Button1Click(Sender: TObject);
var
  v: TfrView;
  b: TfrBandView;
  Page: TfrPage;
begin
  frReport1.Pages.Clear;
  frReport1.Pages.Add;              // create page
  Page := frReport1.Pages[0];

  b := TfrBandView(frCreateObject(gtBand, ''));  // create MasterData band
  b.SetBounds(0, 20, 0, 20);
  b.BandType := btMasterData;
  b.Dataset := 'frDBDataSet1';
  Page.Objects.Add(b);

  v := frCreateObject(gtMemo, '');  // create data field
  v.SetBounds(20, 20, 200, 16);
  v.Memo.Add('[Table1."Company"]');
  Page.Objects.Add(v);

  frReport1.ShowReport;
end;

Так можно создавать любые элементы отчетов.