[kerby666]

Сообщение от poli-smen

Она попадала в переменную X, просто потом эта переменная затиралась содержимым второй записи. (У тебя 2 записи, поэтому содержимое цикла while..end срабатывает дважды)

Забыл ещё дописать :

А чтобы переменная X не затиралась, а например суммировалась, нужно делать так:

Код:

begin
  x := 0;
  Table1.First;
  while not Table1.Eof do
  begin
    x := x + Table1.FieldByName('Price').AsCurrency;
    Table1.Next;
  end;
end;

Мне и нужно было, чтоб затиралась.