Скажем, к примеру, у вас есть поле с именем cost, и вы хотите подвести итоги:
index := grdCevapDBTableView2.GetColumnByFieldName('cost').index;
grdCevapDBTableView2.Columns[index].Summary.Footerkind:=skSum;
grdCevapDBTableView2.Columns[index].Summary.FooterFormat:='£ #.##';
Я бы также вставил beginupdate и endupdate между блоком try..finally, то есть:
grdCevapDBTableView2.BeginUpdate;
try
grdCevapDBTableView2.ClearItems;
fillGridView(grdCevapDBTableView2,command);
grdCevapDBTableView2.DataController.CreateAllItems;
finally
grdCevapDBTableView2.EndUpdate;
end;
это просто гарантирует, что просмотр таблицы в конечном итоге завершит обновление и перерисовку.