Somar em uma outra coluna do dbgrid .
Srs,
alguém já conseguiu somar duas ou mais colunas e mostrar a soma em uma outra coluna do dbgrid , sem usar queries ? já vi dicas para somar toda coluna , não é isso !
Obrigado
alguém já conseguiu somar duas ou mais colunas e mostrar a soma em uma outra coluna do dbgrid , sem usar queries ? já vi dicas para somar toda coluna , não é isso !
Obrigado
Demostenesjr
Curtidas 0
Respostas
Gandalf.nho
06/06/2005
Crie um campo calculado que irá receber o resultado da soma
GOSTEI 0
Demostenesjr
06/06/2005
E na hora de calcular e jogar o valor seria algo assim :
procedure TfOrcaSeleProd.dbgProdutoDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
dbgproduto.Columns[9].Field.text := floattostr(( dtmDados3.tbEstoque1Prec_Venda.asfloat +
dtmDados3.tbEstoque1Preco2.value ) /2 ) ;
Obrigado !
procedure TfOrcaSeleProd.dbgProdutoDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
dbgproduto.Columns[9].Field.text := floattostr(( dtmDados3.tbEstoque1Prec_Venda.asfloat +
dtmDados3.tbEstoque1Preco2.value ) /2 ) ;
Obrigado !
GOSTEI 0
Gandalf.nho
06/06/2005
Não. Vc irá criar o campo calculado no seu dataset e usar o evento OnCalcFields para calcular seu valor. Daí basta tratar o campo calculado como se fosse um campo comum, criando uma nova coluna no DBGrid e atribuindo o campo a ela.
GOSTEI 0
Demostenesjr
06/06/2005
Obrigado . Funcionou ! :P
GOSTEI 0