Oft ist es erforderlich eine Auswahl die in einem Gitter gemacht worden ist, an den Bericht zu transferieren. Dies kann man lösen indem man dies als einen IN Parameter in die SQL Anweisung des Reports übergibt oder aber auch mit dieser neuen Methode.
Dabei wird jetzt einfach die ganze Tabelle an den Report übergeben.
Dabei zu beachten ist, dass für das designen des Reports trotzdem eine SQL Anweisung im Report erstellt werden muss.
Diese wird nachdem das Design fertiggestellt ist einfach mit einer WHERE Klausel 1=2 zu einer SQL ohne Ergebnismenge degradiert.
WICHTIG: Der zweite Parameter ist der Name der SQL Anweisung im Report die zur Designzeit erstellt worden ist.
Somit wird diese durch die Tabelle die direkt übergeben worden ist ersetzt und ausser Kraft gesetzt.
Der dritte Parameter ist nicht erforderlich, schränkt aber bei mehrfach Auswahl die Datenmenge ein.
procedure ButtonKreditorListe_OnClick(Sender: Integer);
var
aReport : TfrmReportData;
begin;
aReport := TfrmReportData.Create('Kreditorliste');
try
aReport.addTable(TableKreditor, 'Kreditor', GridMain.SelectedRows);
aReport.previewreport;
finally
aReport.free;
end;
end;