Código Delphi [-]while not Datamodule1.Myquery1.Eof do begin saldo:= saldo + DataModule1.MyQuery1.FieldByName('Matematicas 1').Assinteger; Datamodule1.Myquery1.Next; end;
while not Datamodule1.Myquery1.Eof do begin saldo:= saldo + DataModule1.MyQuery1.FieldByName('Matematicas 1').Assinteger; Datamodule1.Myquery1.Next; end;