Format danych w pliku tekstowym

Witam,

mam taki problemik: otóż zapisuję sobie dane z tablicy (dane typu extended) do pliku tekstowego. Dane te są wynikami pewnych obliczeń i w programie wyświetlam je na komponencie Memo.

Procedura wygląda następująco:

procedure TForm2.ZapiszDaneDoPLiku(tab: array of extended; nazwa:string);
var
// plik: file of extended;
plik: TextFile;
i:integer;
begin
try
AssignFile(plik,nazwa);
Rewrite(plik);
for i:=0 to 23 do Writeln(plik,tab[i]);
// for i:=0 to 23 do Write(plik,tab[i]);
CloseFile(plik);
except
MessageBox(Form2.Handle,'Wystąpił błąd podczas próby zapisu danych do pliku.','Błąd',MB_ICONERROR)
end;
end;

W programie jest możliwośc wczytania danych z pliku do innego komponentu Memo i porównanie ich ze sobą (wykres)

W pliku dane są zapisane formacie 1.2345678E+0001
Jak zmienić format zapisu danych aby był "bardziej czytelny" tzn 12,3456789 ? Dane do komponentu Memo wczytywane są poprawnie, ale chciałbym potem wykorzystać pliki tekstowe w excelu na zasadzie Kopiuj/Wklej bez dodatkowych modyfikacji ich formatu.

Z góry dziękuję za pomoc!

FloatToStr, Format + F1

Z helpa Delphi

A write parameter has the form

OutExpr [: MinWidth [: DecPlaces ] ]

np porównaj sobie

  Writeln(1/3:5:2);
  Writeln(1/3);

Dzięki za pomoc - już wszystko jasne :)