Цитата:
Сообщение от kerby666
Это понятно, что последнее останется. Но первая запись и не попадала никуда.
|
Она попадала в переменную 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;