"matheproblem" mit delphi

[plautzer]

Wenn ich das richtig sehe, dann sind die zu addierende Felder untereinander, richtig?
dann kannst du diesen code nutze:

Delphi-Quellcode:

procedure TMietverwaltung.summe;
var summ:currency;
begin
summ:=0.0;
while Not Table2.EOF do
  begin
  summ := summ +Table1.FieldByName('DASFELD').AsFloat;
  Table2.Next;
  end;
dbtext1.Caption := Format('%8.2f', [summ])+' €';

wenn die felder nebeneinander sind dann kannste das so machen:
table2['feld1']:=table2['feld2']+table2['feld3']; Plautzer