Hi Andreas,
dies kannst du ganz einfach mit calculated Fields machen.
Dazu erstellst du neben den drei aus der Datenbank ermittelten Feldern (Artikel, konst. Leistung, var. Leistung)
noch zwei Felder, wobei FieldKind des einen(Faktor) auf fkInternalCalc und des anderen(Ergebnis) auf fkCalculated gesetzt wird.
Die Abfrage sieht dann in etwa so aus:
select name, leistung_konst, leistung_var, 1.0 as faktor from artikel
In das OnCalcFields-Ereignis deines DataSets schreibst du dann:
Delphi-Quellcode:
begin
DataSet.FieldByName('ergebnis').AsFloat :=
(DataSet.FieldByName('faktor').AsFloat *
DataSet.FieldByName('faktor').AsFloat *
DataSet.FieldByName('leistung_var').AsFloat) +
DataSet.FieldByName('leistung_konst').AsFloat;
end;
Mfg
Stevie