Hallo,
ich blicke leider nicht durch , wie man ein AutoCalcField definiert.
Ich habe DBEdit6 AutoCalcField auf true gesetzt
Das DBEdit6 ist mit der Datasource1 verbunden, und soll die Summe der Spalte 'Summe Netto' ,
die in einer Tabelle eingetragen werden enthalten. Wenn neue Werte in die Tabelle eingetragen werden ,
soll sich der Wert im DBEdit6 auch verändern
Ich hab das so versucht, aber da erscheint leider gar nichts ???
Delphi-Quellcode:
procedure TForm4.ADOQuery1CalcFields(DataSet: TDataSet);
var D:Integer; K,L :double;
begin
for D:= 1 to dbgrid1.DataSource.DataSet.RecordCount do
begin
dbgrid1.DataSource.DataSet.RecNo:= D;
K := K + dbgrid1.DataSource.DataSet.FieldByName('Summe Netto').AsFloat;
L :=L + dbgrid1.DataSource.DataSet.FieldByName('Summe Brutto').AsFloat;
end;
dbedit6.Text := Floattostr(K);
dbedit7.Text := Floattostr(L);
end;