روش ساختن چارت در زمان اجرا بدون داشتن نوع چارت

[m.davodnia]

سلام آقای مهاجری

من می خوام چارت بسازم بدون اینکه نوعش را بدانم

تقریبا مثل ساختن فرم ها در نمونه دمو

 

Const
 ChartTypeA:array[0..12] of String=('TUniAreaSeries',
    'TUniBarSeries',
    'TUniBar3DSeries',
    'TUniBoxPlotSeries',
    'TUniCandleStickSeries',
    'TUniGaugeSeries',
    'TUniHorizBarSeries',
    'TUniHorizBar3DSeries',
    'TUniLineSeries',
    'TUniPieSeries',
    'TUniPie3DSeries',
    'TUniRadarSeries',
    'TUniScatterSeries');
var
 I,J:integer;
 S:String;
 CSC:TUniChartSeriesClass;
 Fr:TUniChartSeries;
 Val : Double;
 Head : string;
begin

  CSC:=TUniChartSeriesClass(FindClass(chartTypeA[Inx]));
 Fr:=CSC.Create(UniChart1);
 Fr.Parent:=UniChart1;
 UniChart1.SeriesList.Add(Fr);
  for j := 0 to 11 do
  begin
    Head := IntToStr(2000 + j);

    Val := Random(100) + 50;
    Fr.Add(Val, Head);
  end;
end;

[m.davodnia]

سپاس گذارم از پاسختان

[MVakili]

On 3/4/2023 at 9:44 AM, m.davodnia said:

سپاس گذارم از پاسختان

سلام 

راستشو بخواهید من کلا متوجه نشدم چی نیاز دارید 

ولی موضوع بنظرم جالب رسید

می توانید ی کمی در موردش بیشتر توضیح بدهید و بجای کد ، خود ایده را بیان کنید؟