Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
gtramonte Aprendiz
Registrado: Segunda-Feira, 27 de Setembro de 2010 Mensagens: 117
|
Enviada: Dom Out 13, 2019 9:17 pm Assunto: relatorio grafico simples |
|
|
Caros colegas! gostaria de saber se alguem tem um exemplo simples de um grafico que mostre por exemplo os produtos mais vendidos num determinado periodo. Uso Delphi 7 e Firebird. |
|
Voltar ao Topo |
|
|
johnny-walker Moderador
Registrado: Sábado, 4 de Outubro de 2003 Mensagens: 10653 Localização: Contagem/MG - BRAZIL
|
Enviada: Ter Out 15, 2019 5:53 pm Assunto: |
|
|
Estude isto e adapte às suas necessidades:
Código: | var
x, y: array[1..10] of real;
i: integer;
begin
Chart1.Series[0].Clear;
x[1] := 0;
for i:= 2 to 10 do
x[i] := x[i-1]+1;
for i:=1 to 10 do
begin
y[i] := x[i]*x[i] + 2*x[i] -3;
Chart1.Series[0].AddXY(x[i],y[i],'',clBlue);
end;
{Obs.: o terceiro argumento, no caso '', é uma string que aparecerá ao lado de cada valor. Como não queremos que apareça nada, apenas a linha, o argumento foi definido como ''}
{Obs.: o quarto argumento é a cor da linha, no caso, azul}
//Para imprimir o gráfico:
Chart1.Print; |
bye _________________ P.O.W.E.R B.Y D.E.L.P.H.I |
|
Voltar ao Topo |
|
|
gtramonte Aprendiz
Registrado: Segunda-Feira, 27 de Setembro de 2010 Mensagens: 117
|
Enviada: Qui Out 17, 2019 10:03 pm Assunto: |
|
|
na verdade caro colega! eu precisaria de algo bem simples mesmo por exemplo: tenho uma tabela chamada Pedcab no qual guardo a data da venda e o numero do pedido, tenho uma outra tabela chamada peditem no qual vou adicionando os itens da venda como codigo do produto, descricao do produto e a quantidade vendida. O que eu preciso é um grafico que mostre num determinado periodo consultado a quantidade vendida de um determinado produto. abaixo estou testando um comando no ibexpert e ele traz esse total , porém não traz a descricao do produto e a quantidade total vendida desse mesmo produto.
SELECT SUM(PED_QUANTIDADE) AS TOTAL from peditem P inner join pedcab PR
on p.ped_num = PR.ped_num WHERE P.PROD_CODIGO='0008'
and PR.ped_datavenda='02/03/2017'; |
|
Voltar ao Topo |
|
|
|