2 Tabellen mit Quick Report

[Benna]

moin

ich greife mit 2 querys auf 2 tabellen zu:

1.

SQL-Code:

select * from buechertabelle where buchname  like :buc and
fach like :fac and
klassenstufe like :kla

2.

select count (*) from verknuepfungstabelle where buecherid like :bid so rufe ich das ganze auf:

Delphi-Quellcode:

QRY_suchen.close;
QRY_suchen.ParamByName('buc').AsString := '%' + edit1.text + '%';
QRY_suchen.ParamByName('fac').AsString := '%' + combobox1.text + '%';
QRY_suchen.ParamByName('kla').AsString := '%' + combobox2.text + '%';
QRY_suchen.Open;
QRY_vek.close;
QRY_vek.parambyname('bid').asstring:=QRY_suchen.fieldbyname('id').AsString;
QRY_vek.open;
REP_suchen.dataset:=dm_buecher.QRY_suchen;
rep_suchen.qrdbtext1.dataset:=dm_buecher.QRY_suchen;
rep_suchen.qrdbtext2.dataset:=dm_buecher.QRY_suchen;
rep_suchen.qrdbtext3.dataset:=dm_buecher.QRY_suchen;
rep_suchen.qrdbtext4.dataset:=dm_buecher.QRY_suchen;
rep_suchen.qrdbtext5.dataset:=dm_buecher.QRY_vek;
REP_suchen.preview;

wenn die suche jetzt nur einen treffer ergibt haut das ganze hin,
findet er aber in qry_suchen mehrere datensätze dann steht im qrdbtext5 bei allen der gleiche wert