Hallo beisammen,
ich möchte mit folgendem Code eine Abfrage über eine SQL-Tabelle machen, die Summen für verschiedene Kostenarten (Material, Arbeitszeit, ...) erstellt.
Diese Summen will ich dann gesammelt in einem Fenster anzeigen.
<PRE><CODE>
procedure TfmProSum.FormShow(Sender: TObject);
begin
with Query do
begin
Sql.Clear;
Sql.Add('SELECT');
Sql.Add('SUM(ek*menge) AS sumEkMat,');
Sql.Add('SUM(vk*menge) AS sumVkMat');
Sql.Add('FROM propos');
Sql.Add('WHERE typ = ' + CHR(39)+'M'+CHR(39));
Sql.Add('AND projektnr = 12345');
Open;
end;
end;
</PRE></CODE>
Erstes Problem:
Wie kann ich die Abfrage formulieren, dass verschiedene Kosten-Typen (M für Material, F für Fahrzeuge, ...) erfasst werden? Bei meinem Code muss ich mich für einen Typ (hier: M) entscheiden.
Zweites Problem:
Wie zeige ich die Ergebnisse der Abfrage dem Benutzer an?
Am Ende soll ein Fenster stehen, das für jeden Typ Kosten, Erlöse und die jeweilige Differenz anzeigt.
Geht das?
Grüße
Ralph
ich möchte mit folgendem Code eine Abfrage über eine SQL-Tabelle machen, die Summen für verschiedene Kostenarten (Material, Arbeitszeit, ...) erstellt.
Diese Summen will ich dann gesammelt in einem Fenster anzeigen.
<PRE><CODE>
procedure TfmProSum.FormShow(Sender: TObject);
begin
with Query do
begin
Sql.Clear;
Sql.Add('SELECT');
Sql.Add('SUM(ek*menge) AS sumEkMat,');
Sql.Add('SUM(vk*menge) AS sumVkMat');
Sql.Add('FROM propos');
Sql.Add('WHERE typ = ' + CHR(39)+'M'+CHR(39));
Sql.Add('AND projektnr = 12345');
Open;
end;
end;
</PRE></CODE>
Erstes Problem:
Wie kann ich die Abfrage formulieren, dass verschiedene Kosten-Typen (M für Material, F für Fahrzeuge, ...) erfasst werden? Bei meinem Code muss ich mich für einen Typ (hier: M) entscheiden.
Zweites Problem:
Wie zeige ich die Ergebnisse der Abfrage dem Benutzer an?
Am Ende soll ein Fenster stehen, das für jeden Typ Kosten, Erlöse und die jeweilige Differenz anzeigt.
Geht das?
Grüße
Ralph
Comment