Criar gráfico a partir dos items marcados do CheckListBox

03/12/2003

1

Eu tenho um CheckListBox com vários itens...
Eu gostaria de criar os ´series´ do gráfico a partir dos items marcados do CheckListBox, tem como fazer isso?



[b:5b93343aa6]Título editado: ´Iniciante com gráficos´[/b:5b93343aa6]
Utilize uma pequena descrição de sua dúvida nos títulos. Leia as Regras de Conduta.
Sandra/Moderação


Responder

Posts

03/12/2003

Afarias

um exemplo simples:

coloque um Chart (ou DBChart) no form e mais 2 ou 3 CheckBox, e nos eventos OnClick dos componentes CheckBox associe o método::


procedure TForm1.CheckBoxClick(Sender: TObject);
begin
if (Sender as TCheckBox).Checked then
begin
with TBarSeries.Create(Self) do
begin
Name := ´Serie_´+(Sender as TCheckBox).Name;
ParentChart := DBChart1;
FillSampleValues(4);
end;
end else
begin
if FindComponent(´Serie_´+(Sender as TCheckBox).Name) <> nil then
FindComponent(´Serie_´+(Sender as TCheckBox).Name).Free;
end;
end;


claro q para exclusão ou outra manipulação das Series criadas, o uso da propriedade DBChart1.SeriesList é muito mais ´charmoso´ que usar o FindComponent... até pq vc pode acessar/deletar as Series pelo ´índice´


T+


Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira