[Alegun]

Немного почесав репу КЭП добавил

...за символом экспоненты "Е" следует знак + или - и до 4 цифр, определяющих степень экспоненты т.е. указывающие, что левую часть нужно умножить на 10 в соответствующей степени: -1E-12 = минус один умножить на десять в минус двенадцатой степени...

Код:

s:= FloatToStr(-0.000000000001);
s:= Copy(s, Pos('E', s) + 1, Length(s));