klink

pior que não eu usei 2 e 2 e não deu ta estranho isso bah

Eu estou fazendo um programinha simples para minha aula de Delhpi mias está dando um erro chato :( Segue o codigo abaixo: procedure TForm1.Button1Click(Sender: TObject); var qm,vm,tm,qme,vme,tme : real; begin qm := 0; vm := 0; tm := 0; qme := 0; vme := 0; tme := 0; qm := strtofloat(edtqtdemorango.text); vm := strtofloat(edtvalormorango.text); qme := strtofloat(edtqtdemelao.text); vme := strtofloat(edtvalormelao.text); tm :=qm*vm; tme := qme*vme; edttotalmorango.text := formatfloat('0.000',tm); edttotalmelao.text := formatfloat('0.000',tme); end; end. Esta dando erro "is a not valid floating point value já tentei de tudo e não sei oque fazer help!!!