aew galera... to fazendu um programa pra controla um caixa..... é muito simples mas esta dando um erro; Is not a valid floating point value não tenho ideia do q seja.. o codigo é esse: ...
DS.DataSet.post;
q_entrada.close;
q_entrada.ParamByName('CODIGO').Value := DBEdit1.Text;
q_entrada.open;
vr_totE := vr_totE + strtofloat(q_entrada.SQL[0]);
showmessage(floattostr(vr_totE)); onde: DS é o datasource q_entrada é um IBquery vr_totE é uma variavel real onde eu grava os valores cada vez q o usuario grava uma nova entrada. bom é isso se alguém puder me ajudar agradeço... Só uma correção... no lugar de: q_entrada.sql[0].................. é q_entrada.fields[0] e agora ele não deixa converter... =/ aiaiaiiaia.... já consegui resolver o problema.... =P vlw d qualquer maneira