ActiveDelphi

[samuel.bmedeiros]

Estou com o seguinte problema
toda vida que cadastro uma compra, o sistema gera as contas a pagar altomaticamente. Porém caso eu coloque o dm.nomedaquery.valor(float)
vai dar erro, pois o numero vai com virgula e o banco reconhce como se foce outra colula.
Então, estou tentando usar o Formatfloat para substituir a virgula pelo ponto.

por exemplo no sql..
insert into contaspagar('1.00');>>>(correto)
insert into contaspagar('1,00');>>>(errado, pois a virgula determina outra coluna);

entao usei o formatfloat da seguinte maneira...
OBS: a variavel teste é uma string...

for i:=2 to DM.IBQuery_ContasPagarN_PARCELAS.Value do
begin
teste:=FormatFloat('#,##0.00',DM.IBQuery_ContasPag ar.fieldbyname('valorparcelapagar').AsFloat);
DM.TrocaSQL(DM.IBQueryGeneric,'insert into contaspagar values('+DM.IBQuery_ContasPagarIDCOMPRA.AsString+' ,'+DM.IBQuery_ContasPagarN_PARCELAS.AsString+','+I ntToStr(i)+','+char(39)+teste+char(39)+','+char(39 )+'NÃO'+char(39)+','+char(39)+'01/01/01'+char(39)+','+char(39)+'01/01/01'+char(39)+')');
end;


Alguma dica de como substituir a virgula pelo ponto... ou formatalo...
sem mecher na propriedade do sistema la no painel de controle...e alterar o formato do número...

Dez de ja agradeço!!!

[Sufolk]

Olá Samuel, seja bem vindo !!!

Dê uma olhada se isso ajuda:
http://www.activedelphi.com.br/forum/viewtopic.php?t=22284&highlight=stringreplace

Qualquer dúvida retorne!!!

[]s Sufolk.

[samuel.bmedeiros]

blza!!!!!
é a função stringreplace...
isso aew!
vlww

[Sufolk]

flw precisando é só postar !!!

[]s