Fórum Format Float Erro: Onde está errado? #275869

Meus amigos encontrei várias mensagens sobre este tópico do format float e apliquei as sugestões mas ainda estou com o mesmo ERRO:
Tenho um campo edit com o valor 1.445,00. Como faço para jogar este valor em uma variável do tipo currency?
Quando tento jogar o valor para uma variável do tipo currency da a mensagem ´´1.445,00´ is not a valid floating point value´.
Não sei mais o que tentar, pois a unica sugestão decimalseparator := ´.´
já foi feita
Agradeço se alguém ajudar.

Segue a rotina:

procedure TDataMod_Tables.AtualizarTotaisAfterPost;
var cOper, cTotalDin, cTotalChq, cTotalCrd, cTotalDeb, cTotalGer: currency;
begin
// Inicializa os contadores
cTotalDin := 0;
cTotalChq := 0;
cTotalCrd := 0;
cTotalDeb := 0;
cTotalGer := 0;
decimalseparator := ´.´;
ERRO -> cTotalDin := StrtoCurr(Form_Despesas_Diarias.FTotDin.Text);
cTotalChq := StrtoCurr(Form_Despesas_Diarias.FTotCheque.Text);
cTotalCrd := StrtoCurr(Form_Despesas_Diarias.FTotCarCred.Text);
cTotalDeb := StrtoCurr(Form_Despesas_Diarias.FTotCarDeb.Text);
cTotalGer := StrtoCurr(Form_Despesas_Diarias.FTotalGer.Text);
decimalseparator := ´,´;

Alex