Falsche Zahlen beim Export von Delphi nach Excel

[enigma]

Hallo,

ich habe eine kurze Frage:
Wenn ich von Delphi 2010 Werte nach Excel 2019 exportiere, s.u.
klappt das mit der Double-Variablen DN.
Bei dem Array mit Doublewerten treten jedoch falsche Werte in Excel auf.

Delphi-Quellcode:

      Excel.ActiveSheet.Cells[2, 4].Value := 'DN = ';
      Excel.ActiveSheet.Cells[2, 5].Value := FloatToStr(DN);

      Excel.ActiveSheet.Cells[3 + idxDa, 3].Value := 'TestArray[i] = ';
      Excel.ActiveSheet.Cells[3 + idxDa, 4].Value := FloatToStr(TestArray[i]);

Vielen Dank für eure Tipps!