Problema na subtração de valores

Delphi

08/10/2008

estou com um problema quando tento subtrair valores de 2 DBedits
da o erro :Is not a valid floating point value
estou usando db express para conexão e fireibird 2.1 como banco de dados
estou usando o codigo abaixo

DBQuantEstoque.Text := FloatToStr(StrToFloat(DBQuantEstoque.Text) + StrToFloat(DBQtdItem.Text));

se alguem puder me ajudar ficarei muito agradecido


Jeovanne

Jeovanne

Curtidas 0

Respostas

Jeovanne

Jeovanne

08/10/2008

estou com um problema quando tento subtrair valores de 2 DBedits da o erro :Is not a valid floating point value estou usando db express para conexão e fireibird 2.1 como banco de dados estou usando o codigo abaixo DBQuantEstoque.Text := FloatToStr(StrToFloat(DBQuantEstoque.Text) - StrToFloat(DBQtdItem.Text)); se alguem puder me ajudar ficarei muito agradecido



GOSTEI 0
Eniorm

Eniorm

08/10/2008

provavelmente algum valor em um dos dbedits estão incorretos no momento em que é feita a conversão,

ou seja, string para float, se haver algum caractere que não pode ser convertido, dará o erro.

e, se um dos dbedits estiverem vazios, tbm da erro.

ou tente algo assim

DBQuantEstoque.Field.AsFloat := 
  DBQuantEstoque.Field.AsFloat - DBQtdItem.Field.AsFloat;



GOSTEI 0
Diegotiemann

Diegotiemann

08/10/2008

DBQuantEstoque.Text := FloatToStr(StrToFloat(DBQuantEstoque.Text) - StrToFloat(DBQtdItem.Text));


Já tive problema com isso é por causa da formatação, ex:
10.045,12 +5,00 vai dar esse erro uma solução é usar stringReplace


GOSTEI 0
Jeovanne

Jeovanne

08/10/2008

DBQuantEstoque.Text := FloatToStr(StrToFloat(DBQuantEstoque.Text) - StrToFloat(DBQtdItem.Text));
Já tive problema com isso é por causa da formatação, ex: 10.045,12 +5,00 vai dar esse erro uma solução é usar stringReplace


ai rapaziada deu certo usei oque os 2 falaram
muito obrigado rapaziada


GOSTEI 0
POSTAR