hi
ich hab das jetzt mal so gemacht. es werden aber keine daten in den report eingefügt und im Feldeditor kann ich die Daten auch nicht eitragen. Rechnungstest ist mein Report aber die
Query befindet sich im aufrufenden Formular.
Delphi-Quellcode:
sRechnungsnummer := EDT_Auftragsnummer.Text;
iRechnungsnummer := StrToInt(sRechnungsnummer);
QRY_BedingteQuery.sql.text := 'SELECT * FROM Rechnungstest WHERE RECHNUNGNR = :iRechnungsnummer';
QRY_BedingteQuery.params.ParamCheck := True;
QRY_BedingteQuery.params.ParamByName('iRechnungsnummer').AsInteger := iRechnungsnummer;
ReportTest.DataSet := QRY_BedingteQuery;
ReportTest.Rechnungsnummer.DataSet := QRY_BedingteQuery;
ReportTest.Rechnungsnummer.DataField := RECHNUNGNR;
ReportTest.Auftragsnummer.DataSet := QRY_BedingteQuery;
ReportTest.Auftragsnummer.DataField := AUFTRAGNR;
ReportTest.Datum.DataSet := QRY_BedingteQuery;
ReportTest.Datum.DataField := DATUM;
ReportTest.Netto.DataSet := QRY_BedingteQuery;
ReportTest.Netto.DataField := NETTO;
QRY_BedingteQuery.Open;
ReportTest.Preview;
QRY_bedingteQuery.Close;
Gruß
DF.A