Skript reportu je triviální:
v comboboxu pro výběr komponent vyberte ReportProperty (poslední komponenta v seznamu) a vytvořte skript události OnBeforeReport
procedure OnBeforeReport(Sender : TReportProperty);
begin
BDEQuery1.Query.Open;
Sheet['B4'].QueryToCells:=BDEQuery1.Query;
BDEQuery1.Query.Close;
end;
begin
end.
to je vše QueryToCells vloží všechny řádky a sloupce z dotazu do reportu a zajistí i vložení potřebných řádků. Výsledek může vypadat třeba takto:
no to je pěkné ... ale co dál ... Naplnění reportu daty Query a cyklus while