Fórum Criar grafico Tchart usando apenas codigo #478943

Bom dia!

Tenho a seguinte situação: preciso criar um grafico em cada tabsheet dependendo do numero inserido pelo usuario. É uma rotina que pode variar muito.

Então eu preciso que esta criação seja feita em tempo de execução.

Fiz alguns testes mas nao deu certo

//NTabs é o numero que o usuario escolheu

for I := 1 to Ntabs do
begin
//criação da tabsheet
NewTabSheet := TTabSheet.Create(Form2.PageControl1);
NewTabSheet.PageControl := Form2.PageControl1;
nome := 'teste' + inttostr(i);
NewTabSheet.Caption := 'teste' + inttostr(i);

//criação do grafico
chart := Tchart.Create(NewTabSheet);
chart.Visible := true;
chart.AddSeries(TbarSeries.Create(chart));
//chart.Visible := true;
//chart.create(chart);
end;
Form2.show;