|
|
#1
|
|||
|
|||
Суммирование
Необходимо сделать в отдельной строке сумму значений поля в BDGrid
|
#2
|
||||
|
||||
Код:
procedure TForm1.Button5Click(Sender: TObject); var sum:real; begin sum:=0; DBGrid1.DataSource.DataSet.First; while not DBGrid1.DataSource.DataSet.Eof do begin sum:=sum+DBGrid1.DataSource.DataSet.fieldbyname('имя поля').AsFloat; DBGrid1.DataSource.DataSet.Next; end; showmessage(floattostr(sum)); end; Последний раз редактировалось Admin, Сегодня в 10:32. |
#3
|
|||
|
|||
А если у меня поле -денежное
|
#4
|
||||
|
||||
а какая разница? деньги что не в числах считаются? если не нравится asfloat то сделай asInteger
Последний раз редактировалось Admin, Сегодня в 10:32. |
#5
|
||||
|
||||
Цитата:
|
#6
|
|||
|
|||
Спасибо ,все получилось
|
#7
|
|||
|
|||
Все получилось , спасибо
|