ActiveDelphi

wjuniordias

Olá pessoal,

É possível criar um campo no CDS sem que o mesmo exista numa tabela do banco?
Para facilitar o entendimento, vou dar alguns detalhes:

Tenho um "sqlDataSet" com a seguinte instrução SQL:

imex · Enviada: Qui Jul 17, 2014 12:02 pm Assunto:

Bom dia,

Para esse caso acho que você pode criar um campo do tipo InternalCalc no ClientDataSet.

Espero que ajude.

wjuniordias · Enviada: Qui Jul 17, 2014 3:05 pm Assunto:

Ok, vou fazer isso, logo posto se deu certo ou não. Obrigado pela dica.
_________________
"O sábio nunca diz tudo o que pensa, mas pensa sempre tudo o que diz." (Aristóteles)

wjuniordias · Enviada: Qui Jul 17, 2014 4:00 pm Assunto:

Deu certo. Só que agora o "DBCheckBox" não aparece na DBGrid, no lugar aparece "True" ou "False". rs

Será que tem a ver com o tipo do campo, que antes era "fkData" e agora "fkInternalCalc"?

Acredito que não, mas por descargo de consciência resolvi perguntar.

Grato.
_________________
"O sábio nunca diz tudo o que pensa, mas pensa sempre tudo o que diz." (Aristóteles)

imex · Enviada: Qui Jul 17, 2014 5:22 pm Assunto:

Acho que teria você teria que analisar o seu código. Pode ser que esteja em um bloco que só é executado quando o campo é um fkData...

johnny-walker · Enviada: Sex Jul 18, 2014 11:31 am Assunto:

Amigo é possível sim criar tal campo, mas não pode fazer parte nem da cláusula WHERE e nem da UPDATE, pois lhe causaria erro.

Bem se vc estiver com dificuldade em criar o checkbox, eis um código que utilizo:

wjuniordias · Enviada: Sex Jul 18, 2014 2:00 pm Assunto:

Legal, neste caso, eu teria que configurar o providerFlags deste campo né?
_________________
"O sábio nunca diz tudo o que pensa, mas pensa sempre tudo o que diz." (Aristóteles)

wjuniordias · Enviada: Seg Jul 21, 2014 5:29 pm Assunto:

Então pessoal, se eu criar um CDS temporário com os mesmos campos do CDS original, e no temporário criar um campo "Check" do tipo Boolean (fkData), e seguir os passos do link abaixo, o DBCheckBox aparece na DBGrid.

http://delphi.about.com/od/usedbvcl/l/aa082003a.htm

Acontece que eu tenho que fazer um procedimento para popular o temporário, ou seja, que le todos os dados do CDS original e popula o temporário.
Isso me toma muito o tempo, por isso que estou tentando procurar uma solução que me permita ter o mesmo efeito, só que com o CDS original.
Se eu crio um campo no dataset da erro de "Field Not Found" ao executar o SQL, mesmo configurando o "ProviderFlags".
Se eu alterar o campo para "InternalCalc", elimina o erro citado, contudo, o DBCheckBox não aparece na DBGrid. Mostra apenas "True" ou "False".
Claro que existem componentes de terceiros que resolveriam meu problema, mas procuro não utilizá-los, porque já tive problema quando precisei mudar de versão no Delphi e certos componentes não terem suporte, aí tive que sair alterando tudo.

Se não tiver como, tudo bem, eu crio o temporário mesmo, mas, vai que alguém conhece alguma forma que simplifica isso tudo, exatamente por isso que resolvi postar aqui. Smile

Desde já, agradeço as dicas de todos. Wink

_________________
"O sábio nunca diz tudo o que pensa, mas pensa sempre tudo o que diz." (Aristóteles)

imex · Enviada: Ter Jul 22, 2014 10:45 am Assunto:

Acho que o fkInternalCalc deveria funcionar da mesma forma que o fkData.
Você adicionou algum código no evento OnCalcFields do Cds?
Você verificou se os blocos de código que estão abaixo do If que segue são executados?

wjuniordias · Enviada: Ter Jul 22, 2014 1:49 pm Assunto:

Então, estranho, porque se eu usar InternalCalc, o DBCheckBox não aparece na DBGrid. Não tenho nenhuma implementação no evento "OnCalcFields".
Se eu volto para "fkData" da erro de "Field Not Found", e se eu crio em um ClientDataSet temporário, dá certo, isso sem alterar nada no código. rsrs
Muito estranho, mas, se fizer criando o campo no sql igual vc (imex) mostrou, da certo também, sem ter que criar um temporário e popular. Resolveu meu problema. Muito obrigado.

Segue abaixo o código que eu uso no evento "OnDrawColumnCell":

imex · Enviada: Ter Jul 22, 2014 3:45 pm Assunto:

Só para tentar entender melhor, qual é o nome do campo do tipo fkInternalCalc, e como está preenchida a propriedade DataField do DBCheckBox1?

wjuniordias · Enviada: Ter Jul 22, 2014 4:13 pm Assunto:

imex · Enviada: Ter Jul 22, 2014 4:23 pm Assunto:

Não testei, pode ser que não tenha relação com o problema, mas experimente comentar o trecho abaixo:

wjuniordias · Enviada: Ter Jul 22, 2014 4:25 pm Assunto:

imex, realmente o campo InternalCalc dá certo sim, foi falta de atenção minha na implementação em algum momento, porque resolvi começar um projeto novo e ir fazendo parte por parte e agora deu certo.

Obrigado novamente e desculpe pela minha falta de atenção.
_________________
"O sábio nunca diz tudo o que pensa, mas pensa sempre tudo o que diz." (Aristóteles)