Доброго времени суток, Скажите, пожалуйста, почему при работе с типом Variant всплывают странные значения?!

code:
 
...
FVariantArray: array of Variant;
...
procedure FieldSum();
var
  eValue: Variant;
begin
  ...
  if ArrayIsEmpty(FVariantArray) then SetLength(FVariantArray, 1);
  eValue := FVariantArray[0];
  eValue := eValue + DataSet.Fields[0].Value; //<<<счетчик значений поля
  FVariantArray[0] := eValue;
end;

Если посмотреть на строчку FVariantArr ...

http://www.delphikingdom.com/asp/answer.asp?IDAnswer=83572