[Assistant]

Код:

var
  a: integer;
begin
  a := ADOTableCenaField.AsInteger; // занесет значение ячейки Code (смотря как вы назвали вычисляемое поле) для выделенной строки
  // или ADOQuery, чего вы там используете.
end;

Сообщение от sanya.tm

И еще как вывести общую сумму поля Cena

где именно вывести?

P.S.: в принципе я так и не понял до конца что именно вам надо, если честно )))