Impressao no delphi
Galera estou com um serio problema... por favor me ajudemmm
eu tenho uma DBGrid com itens com descrição e quantidade e tals....
oque eu quero fazer é pegar estes itens e por exemplo na DBGrid tem 5 maçãs mas todas fora de ordem, 5 peras fora de ordem tambem....
queria pegar essas maçãs e separar a quantidade em uma variavel, pegar as peras e separar a quantidade em outra variavel e assim por diante....
e depois imprimir tudo.... mas como eu faço issooo???????
eu tenho uma DBGrid com itens com descrição e quantidade e tals....
oque eu quero fazer é pegar estes itens e por exemplo na DBGrid tem 5 maçãs mas todas fora de ordem, 5 peras fora de ordem tambem....
queria pegar essas maçãs e separar a quantidade em uma variavel, pegar as peras e separar a quantidade em outra variavel e assim por diante....
e depois imprimir tudo.... mas como eu faço issooo???????
Rafael Yudi
Curtidas 0
Respostas
Robson Morais
03/06/2017
os dados estão em uma query ?
var qtPera, qtMaca : Integer;
with not query.eof do
begin
if query.FieldByName('descricao').asString = 'PERA' then
inc(qtPera)
else
inc(qtMaca);
query.next;
end;
GOSTEI 0
Gutierry Pereira
03/06/2017
no fastReport pode utilizar o recurso de agrupamento.
GOSTEI 0