Erro para gravar valores

Estou com este problema. Quando eu carrego a página eu coloco no textbox da seguinte forma :

TBVTotal.Text := Format('%15.2n',[dr['valortotal']]);

Sem problemas, mas na hora de gravar o firebird não entende e me grava errado por exemplo, '123,45' ele grava '12345,00'.

Estou gravando assim :

FbComNF.Parameters['@valortotal'].Value := TBVTotal.Text;

Estou fazendo errado o que ?

Obrigada.