Witam serdecznie mam nastepujący problem tworze raport w rave reports i stworzylem w visualu global page przekazalem parametry i wszystko dziala jak nalezy niestety mam pewien problem. Otoz musze do tego raportu przekazac parametry z bazy danych ( w moim przypadku 3 strony ulozone w swojego rodzaju tabelke). Moje pytanie jak wpisac dane z bazy aby automatycznie wpisaly sie w ten szablon i kazda nastepna strona tworzyla sie w ten sposob ?? Gdy zrobilem to z kodu udalo mi sie uzyskac ten efekt tylko pytanie czy da sie to z visuala zrobic ??

var
  imie,nazwisko,devices, fotka:string;
  Bitmap:TBitmap;
  i:double;
  j: integer;
begin
  Bitmap := TBitmap.Create;
  with Report do
  begin
    MarginLeft := 0.2;
    MarginRight := 0.2;
    MarginTop := 0.2;
    MarginBottom := 0.2;
    SetFont('Arial', 10);
    NewLine;
    Bitmap.LoadFromFile('test.bmp');
    PrintBitmapRect(MarginLeft ,MarginTop ,2,1, Bitmap);
    PrintXY(2.1, Ypos + 0.1, 'Firma: ' + dmMain.qrLicencjanazwa.AsString);
    NewLine;
    PrintXY(2.1, YPos + 0.1, 'Nip: ' + dmMain.qrLicencjanip.AsString);
    for j := 0 to 4 do
      NewLine;
    SetFont('Arial', 15);
    FontColor := clRed;
    PrintCenter('Raport użytkowników ', PageWidth/2);
    NewLine;
    NewLine;
    SetFont('Arial', 12);
    Bold := True;
    PrintXY(0.4,YPos,'Dane osobowe');
    Bold := False;
    NewLine;
    qrUsers.Open;
    qrUsers.First;
    qrUID.Open;
    qrUID.First;
    while not qrUsers.Eof do
    begin
      SetFont('Arial', 10);
      if (LinesLeft < 3) and (not qrUsers.Eof) then
      begin
        NewPage;
        NewLine;
        NewLine;
      end;
      devices := '';
      PrintXY(0.4,YPos,qrUsersdane.AsString);
      NewLine;
      while not qrUID.Eof do
      begin
        devices := devices + qrUIDnazwa_urzadzenia.AsString + ', ';
        qrUID.Next;
      end;
      SetFont('Arial', 8);
      PrintXY(0.6,YPos,devices);
      NewLine;
      NewLine;
      qrUsers.Next;
    end;
  end;
  Bitmap.Free
end;