m.davodnia Posted December 17, 2022 Share Posted December 17, 2022 سلام آقای مهاجری من می خوام چارت بسازم بدون اینکه نوعش را بدانم تقریبا مثل ساختن فرم ها در نمونه دمو 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; Quote Link to comment Share on other sites More sharing options...
m.davodnia Posted March 4, 2023 Author Share Posted March 4, 2023 سپاس گذارم از پاسختان Quote Link to comment Share on other sites More sharing options...
MVakili Posted March 28, 2023 Share Posted March 28, 2023 On 3/4/2023 at 9:44 AM, m.davodnia said: سپاس گذارم از پاسختان سلام راستشو بخواهید من کلا متوجه نشدم چی نیاز دارید ولی موضوع بنظرم جالب رسید می توانید ی کمی در موردش بیشتر توضیح بدهید و بجای کد ، خود ایده را بیان کنید؟ Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.