Trabalhando com DBChar

Trabalhando com DBChar

  junho 27, 2015    Ana Paula Novello

---

O DBChart possui diversas configurações tanto no Layout quanto na funcionalidade, fazer gráficos não é tão complexo quanto muitos acham, mas sim temos pouco material sobre o assunto, vou explorar o máximo deste componente, e caso alguém tenha alguma dica ou dúvida sobre uma determinada parte basta entrar em contato.

Vamos à construção do exemplo. Vou criar um cenário bem simples para ilustrar. Imagine as olimpíadas onde temos uma tabela com os países participantes, e temos o número de medalhas de cada um armazenados na tabela de Medalhas, observe o relacionamento:

Vamos utilizar

• TDBGrid;
• TClientDataSet;
• TDataSource;
• TDBChart;
• TPanel;
• TComboBox;
• TLabel;
• TBitBtn;

Coloquei em tela e ficou assim 

No TComboBox coloquei as informações com o nome dos gráficos que quero testar

No TComboBox coloquei as informações com o nome dos gráficos que quero testar

Duplo clique no TDBChart em tela ira abrir uma tela (Abaixo)

Clique em "Add..."

Irá aparecer os gráficos. É só dar um duplo clique no que preferir. ( No meu exemplo vou pega um de cada ) 

Depois que selecionou um vá para aba "Series" sub aba "Data Source"

No Data Source escolha "DataSet" no ComboBox da aba

Ira habilitar para selecionar a descrição "Labels" e o campo que vai servir como base para os gráfico "Pie"

Na figura abaixo mostra onde pode alterar o titilo do TDBChart

No meu exemplo coloquei um de cada gráfico e desmarquei os campos para não ficarem visíveis por hora 

No botão coloquei o código abaixo

var 
  i: integer;
begin
  for I := 0 to 9 - 1 do
    DBChart1.Series[I].Visible := False;
  DBChart1.Series[cbEscolher.ItemIndex].Visible := True;

Assim casa vez que vou trocar de conteúdo no TComboBox = "cbEscolher" ira ficar visível o gráfico que escolhi.

Qualquer duvida só deixa comentário

Exemplo: Download