Fórum Problemas Formatação Campos - Oracle +DbxConnection; #391307
25/11/2010
0
Ola, preciso de ajuda,
estou tendo dificuldades na conexao com banco de dados ORACLE atraves de uma classe de conexão,
utilizando TDBXConnection;
meu problema é o seguinte,
nao consigo formatar campos Float no Delphi,
apesar de utilizar mascara para o campo
ex : TFloatField(Cds.Fields[6]).DisplayFormat := '###,###,##0.00';
os valores no banco de dados ficam formatados corretamente. ex : 1,50
ja no clientdataset o mesmo valor fica como 150,00.
fiz uma vasta pesquisa na google, e descobri que utlizando o componente SQLConnection, esse problema é
rapidamente resolvido colocando no evento AfterConnect o seguinte código:
SQLConnection.Execute('alter session set NLS_NUMERIC_CHARACTERS=''.,''', NIL,NIL);
como nao tenho SQLconnection na minha classe e sim uma instancia do TdbxConnection, tentei utilizar
assim :
FCom.Text := 'alter session set NLS_NUMERIC_CHARACTERS=''.,''';
FCom.ExecuteUpdate;
onde FCom : TDBXCommand;
mas nao obtive o resultado esperado, a formatacao do campo fica correta,
mas as alteracoes ou inclusoes de registros que solicito ao banco de dados
nao sao realizadas, mas se retirar as linhas de codigo, entao sim..
desde já fico agradecido,
estou tendo dificuldades na conexao com banco de dados ORACLE atraves de uma classe de conexão,
utilizando TDBXConnection;
meu problema é o seguinte,
nao consigo formatar campos Float no Delphi,
apesar de utilizar mascara para o campo
ex : TFloatField(Cds.Fields[6]).DisplayFormat := '###,###,##0.00';
os valores no banco de dados ficam formatados corretamente. ex : 1,50
ja no clientdataset o mesmo valor fica como 150,00.
fiz uma vasta pesquisa na google, e descobri que utlizando o componente SQLConnection, esse problema é
rapidamente resolvido colocando no evento AfterConnect o seguinte código:
SQLConnection.Execute('alter session set NLS_NUMERIC_CHARACTERS=''.,''', NIL,NIL);
como nao tenho SQLconnection na minha classe e sim uma instancia do TdbxConnection, tentei utilizar
assim :
FCom.Text := 'alter session set NLS_NUMERIC_CHARACTERS=''.,''';
FCom.ExecuteUpdate;
onde FCom : TDBXCommand;
mas nao obtive o resultado esperado, a formatacao do campo fica correta,
mas as alteracoes ou inclusoes de registros que solicito ao banco de dados
nao sao realizadas, mas se retirar as linhas de codigo, entao sim..
desde já fico agradecido,
Ederson Caldatto
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)