Fórum Fazer loop em um dbgrid e alterar os valores??? #177867
27/08/2003
0
Tipo assim:
imaginemos que temos 03 linhas e o valor total da compra é de 20,00
assim que for inserindo itens no meu grid, automátimente ele vai rateando este vintes pela quantidade de linha
digamos que na primeira linha é 20,00
na segunda é de 10,00
na terceira é de 6,6666 e assim sucessivamente, ou seja, os valores acima todos serão de 6,666
Espero ter explicado direito...
Obrigado!
Jelves
Ps: Uso Dbexpress SQLDATASET e Interbase
Jelves
Curtir tópico
+ 0Posts
27/08/2003
Dgpires
IBQuery1.First;
Count := 0;
While not IBQuery1.EoF do
Begin
IBQuery1.Next;
Count := Count + 1; // pode usar também Inc(Count)
end;
Valor := Total / Count
Depois é só repetir o laço acrescentando o valor em cada campo !
Espero ter ajudado,
Douglas
Gostei + 0
27/08/2003
Jelves
0 Todas 1 Carga 2 Descarga. por isso que não posso usar o count
Mais mesmo assim obrigado, por ter me ajudado!
Jelves
Gostei + 0
27/08/2003
Dgpires
Se você puder mandar o código fonte e o que vc está querendo, eu posso dar uma olhada.
dgpires@hotmail.com
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)