[LoPiTaL]

Tal vez es una tontería lo que voy a decir... pero, ¿por qué no haces esto?

edit1.text := FormatFloat('#,##0.00', valor)+'$';

ó

edit1.text := '$'+FormatFloat('#,##0.00', valor);

Un saludo,
LoPiTaL