Fórum Erro ao tentar gravar texto " 30.00" em Campo Numeric(10,2), no firebird #383118

Preciso gravarr os dados de um arquivo texto em uma tabela do firebird, conforme abaixo:  DADOS.TXT 000001JOSE DA SILVA        19841231     30.00   
000002JOSÉ SERRA           19500305    110.00
Leiaute do Arquivo.TXT
CODIGO, 1, 6 NOME, 7, 20 DATA, 28,8 VALOR, 36,10   
Campos da Tabela CODIGO INTEGER,
NOME VARCHAR(20),
DATA DATE,
VALOR NUMERIC(10,2)  
Estou fazendo assim...
Para CODIGO INTEGER, faço IbTableDadosCODIGO.AsInteger := StrToInt(Copy(Linha, 1,6));
Para NOME VARCHAR(20), IbTableDadosNOME.AsString := Copy(Linha,7 ,20); Para DATA DATE, IbTableDadosDATA.AsDateTime := StrToDate(Copy(Linha,34 ,2)+'/'+Copy(Linha,32 ,2)+'/'+Copy(Linha,28 ,4));
e para VALOR NUMERICO(10,2), como devo fazer?
Já fiz...
IbTableDadosVALOR.AsFloat := StrToFloat(Trim(Copy(Linha,36 ,10)));
IbTableDadosVALOR.AsCurrency := StrToCurr(Trim(Copy(Linha,36 ,10)));
... mas dá o erro... Project ImportaDados.exe raised exception class EConvertError with message ''0.00' is not a valid floating point value'.