FreeReport i parametry

0

Załóżmy, że mam gotowy szablon faktury wykonany w freereport designerze i tam poustawiałem zmienne do których będę przesyłał dane i na koniec taki raport wyświetlę i wydrukuję.

Wszystko gra oprócz tych zmiennych umieszczonych w pliku raportu. Nie wiem jak się do nich dostać.
Pewnie jest to jedna sekwencja której nie znam.

0

Zmienne przesyłasz przez zdarzenie OnGetValue np. [ZMIENNA]

if ParName = 'ZMIENNA' then ParValue := <i>jakaśwartosc</i>

0

Już załapałem dzieki wielkie.

0

Wszystko fajnie ale gdy próbuję załadować np listę towarów muszę określić ilość pozycji w Master Data i kolejno wczytać dane do tego komponentu. Pytanie jak to zrobić przy użyciu danych umieszczonych bezpośrednio w tablicy a nie w bazie danych.

0

Ok znowu sobie poradziłem
wystarczy powiazać komponent frUserDataset z komponentem MasterData w projekcie freereporta i dynamicznie nadać mu wartosc koncowa rangeendcount := 5;

dalej budujemy procedure:

procedure TForm1.frReport1GetValue(const ParName: string; var ParValue: Variant);
begin
  if ParName = 'nr_fv' then ParValue := '12/05/2008';
  if ParName = 'sprz_nip' then ParValue := 'nip';
  if frUserDataset1.RecNo = 0 then if ParName = 'nazwa_towaru' then ParValue := 'Towar AB';
  if frUserDataset1.RecNo = 1 then if ParName = 'nazwa_towaru' then ParValue := 'Towar A';
  if frUserDataset1.RecNo = 4 then if ParName = 'nazwa_towaru' then ParValue := 'Towar B';
end;

itd.

po prostu sprawdzamy frUserDataset1.RecNo i przypisujemy warość do parametru.

1 użytkowników online, w tym zalogowanych: 0, gości: 1