Hi,
hier ist ein kleines Code-Beispiel, wie Du eine Query-Kompo für zwei Abfragen aus zwei verschiedenen Tabellen nutzt :
Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| with DatenModul.ADOQueryAbfrageEingang do begin
SQL.Clear;
SQL.Add('SELECT SUM(ZubehoerMenge) AS Anzahleingang FROM ZubehoerEingang WHERE ZubehoerHersteller=' +
QuotedStr(DBZubehoerHerstellerAusgang.Text) + ' AND ZubehoerTyp=' +
QuotedStr(DBZubehoerTypAusgang.Text));
Open;
Eingangssumme := FieldByName('Anzahleingang').AsInteger;
SQL.Clear;
SQL.Add('SELECT SUM(ZubehoerMenge) AS Anzahlausgang FROM ZubehoerAusgang WHERE ZubehoerHersteller=' +
QuotedStr(DBZubehoerHerstellerAusgang.Text) + ' AND ZubehoerTyp=' +
QuotedStr(DBZubehoerTypAusgang.Text));
Open;
Ausgangssumme := FieldByName('AnzahlAusgang').AsInteger;
end; |
Hier wird die Gesamtmenge aus der Eingangstabelle in eine Variable gespeichert und dann über die gleiche Query-Kompo die Gesamtmenge aus der Ausgangstabelle in eine Variable geschrieben. Dann kan ich beide Werte verwenden.
