Ajuda com Valores floats...

Question

Ol�tenho um banco de dados mysql...  e a tabela que eu tenho � o seguinteCodigo  Descricao  data                valor220       dolar        2005-01-01      1.90221       euro         2005-01-01      1...

Rod8 · Answer

qual o tipo do campo valor ?...

Fernando_cunha · Answer

Float...

Paullsoftware · Answer

[quote:f54700f4b8=�fernando_cunha�]Float[/quote:f54700f4b8]Clique duas vezes no componente Table/Query selecione o campo Float e no Object Inspector mude a propriedade Currency para True...espero ter ajudado! :wink:...

Paulo · Answer

Nao conheco bem o MySql, mas tive problemas semelhantes com SQL Server. Percebi que o campo Float, � um numero que internamente, ele tem varias casas decimais como precis�o. Dai eu nao usar campos Float, quando preciso usar mascaras formatadas com 2 ou 3 casas decimais. No Sql Server, uso o [color=red:b5f4c74fc8]Numeric(12,2)[/color:b5f4c74fc8], j� mascarado no banco, o que nunca me deu mais problemas, como posso uasar o Money(Nao e o mesmo da mascara Currency, citado acima). Em FireBird, uso o Double Precision. Caso vc tenha que fazer calculos com esse numero e depois te dar o resultado, nao te aconselho a usar a Mascara CURRENCY, conforme o PaullSoftware te recomendou. Mude o tipo de campo, caso o MySql te permita, ou use um [color=red:b5f4c74fc8]FloatToStrf(valor, ffNumber, 12,2)[/color:b5f4c74fc8], para carregar dentro do Edit, o que te mascararia com vc quer. Lembrando, que por ser um numero Flutuante, � poss�vel, que te de um resultado diferente do que vc quer, no caso de C�lculo. Eu disse que � poss�vel, mas n�o afirmei, por isso cara, faca variuso testes para ter a certeza que os calculo estao corretos. Qualquer coisa, poste mais.

Fernando_cunha · Answer

obrigado pela ajuda pessoal.... [quote:95b564c2b2] PaullSoftware Escreveu:Clique duas vezes no componente Table/Query selecione o campo Float e no Object Inspector mude a propriedade Currency para True... espero ter ajudado!  [/quote:95b564c2b2]PaullSoftware, eu n�o posso fazer assim pois possuo uma unica query para todas as minhas tabelas... e ao carregar o form eu fa�o o seguinte[code:1:95b564c2b2]DbGrid1.DataSource:=DataModule1.DtsProcurar;DataModule1.ZQuery1.SQL.Clear;DataModule1.ZQuery1.SQL.Add(�SELECT * FROM taxa�);Datamodule1.ZQuery1.open;TNumericField(Datamodule1.ZQuery1.FieldByName(�valor�)).DisplayFormat := �,0.00;-,0.00�;Dbgrid1.Columns&#91;0&93;.FieldName:=�cod_taxa�;Dbgrid1.Columns&91;0&93;.Width:=40;Dbgrid1.Columns&91;0&93;.Title.caption:=�C�digo�;Dbgrid1.Columns&91;1&93;.FieldName:=�descricao�;Dbgrid1.Columns&#91;1&93;.Width:=130;Dbgrid1.Columns&91;1&93;.Title.caption:=�Descri��o�;Dbgrid1.Columns&91;2&93;.FieldName:=�valor�;Dbgrid1.Columns&91;2&93;.Width:=102;Dbgrid1.Columns&91;2&93;.Title.caption:=�Valor�;[/code:1:95b564c2b2]e Paulo,  eu realmente tive que testar varios formatos de mascara... at� que deixei na �decimal� ele traz l� o valor 1,56 normal ... o problema agora esta sendo quando tem zero no final...  tipo o valor � 1,20 ele so me traz 1,2obrigado pela ajuda anteriormente... agora eu so preciso trazer o bendito 0 no final.... abra�os...

Paullsoftware · Answer

voc� n�o pode tentar um FormatFloat(�#,,0.00�,CampoFloat)??...

Fernando_cunha · Answer

bom eu coloquei o comando no exit do edit e nao vai...

coloquei tambem logo quando trago os valores da grid pro edit e tbm nao vai... ele ja traz 1,2 ... sem o zero... ai ele nao consegue converter nada

Fernando_cunha · Answer

Olaalgum poderia me ajudar ???nao estou conseguindo mesmo :( vou postar os codigo inteiro pra ver se ajuda alguma coisao detalhe que no banco esta 1.20... e na grid traz 1.20.... so que quando puxo pro edit ele so traz 1.2 ele corta o 0....algum plz ajuda... pois estou com problema neste form... mas possuo mais 5 forms com valores q provavelmente ta com mesmo problema...grato[code:1:5584c829e6]procedure TFrmProcurarTaxa.FormActivate(Sender: TObject);beginDbGrid1.DataSource:=DataModule1.DtsProcurar;DataModule1.ZQuery1.SQL.Clear;DataModule1.ZQuery1.SQL.Add(�SELECT * FROM taxa�);Datamodule1.ZQuery1.open;TNumericField(Datamodule1.ZQuery1.FieldByName(�valor�)).DisplayFormat := �,0.00;-,0.00�;Dbgrid1.Columns&#91;0&93;.FieldName:=�cod_taxa�;Dbgrid1.Columns&91;0&93;.Width:=40;Dbgrid1.Columns&91;0&93;.Title.caption:=�C�digo�;Dbgrid1.Columns&#91;1&93;.FieldName:=�descricao�;Dbgrid1.Columns&91;1&93;.Width:=130;Dbgrid1.Columns&91;1&93;.Title.caption:=�Descri��o�;Dbgrid1.Columns&91;2&93;.FieldName:=�valor�;Dbgrid1.Columns&91;2&93;.Width:=102;Dbgrid1.Columns&91;2&93;.Title.caption:=�Valor�;end;[/code:1:5584c829e6][code:1:5584c829e6]procedure TFrmProcurarTaxa.DBGrid1DblClick(Sender: TObject);beginFrmtaxa.EdtCodigo.Text:= DataModule1.ZQuery1.fieldbyname(�cod_taxa�).AsString;Frmtaxa.EdtDescricao.Text:= DataModule1.ZQuery1.fieldbyname(�descricao�).AsString;Frmtaxa.EdtValor.Text:= Datamodule1.ZQuery1.fieldbyname(�valor�).Asstring;close;end;[/code:1:5584c829e6]...

Fernando_cunha · Answer

ola pessoal.consegui resolver o problema.ficou da seguinte maneira... [code:1:f397862d97]procedure TFrmProcurarTaxa.FormActivate(Sender: TObject);beginDbGrid1.DataSource:=DataModule1.DtsProcurar;DataModule1.ZQuery1.SQL.Clear;DataModule1.ZQuery1.SQL.Add(�SELECT * FROM taxa�);Datamodule1.ZQuery1.open;TNumericField(Datamodule1.ZQuery1.FieldByName(�valor�)).DisplayFormat := �,0.00;-,0.00�;Dbgrid1.Columns&#91;0&93;.FieldName:=�cod_taxa�;Dbgrid1.Columns&91;0&93;.Width:=40;Dbgrid1.Columns&91;0&93;.Title.caption:=�C�digo�;Dbgrid1.Columns&91;1&93;.FieldName:=�descricao�;Dbgrid1.Columns&91;1&93;.Width:=130;Dbgrid1.Columns&91;1&93;.Title.caption:=�Descri��o�;Dbgrid1.Columns&91;2&93;.FieldName:=�valor�;Dbgrid1.Columns&91;2&93;.Width:=102;Dbgrid1.Columns&91;2&93;.Title.caption:=�Valor�;end;procedure TFrmProcurarTaxa.DBGrid1DblClick(Sender: TObject);beginFrmtaxa.EdtCodigo.Text:= DataModule1.ZQuery1.fieldbyname(�cod_taxa�).AsString;Frmtaxa.EdtDescricao.Text:= DataModule1.ZQuery1.fieldbyname(�descricao�).AsString;Frmtaxa.EdtValor.Text:= FormatFloat(�0.00�, StrToFloat(Datamodule1.ZQuery1.fieldbyname(�valor�).AsString));close;end;[/code:1:f397862d97]Obrigado pela ajuda de todos....