نقل قول: کپی کردن dbchart
سلام. خب مشکلتون کجاست؟
سری داخلش رو به عنوان پارامتر ارسال کنید. یا دیتاست مربوطه رو بفرستید، یا آرایه ای که ازش دارید می سازید رو به عنوان پارامتر پاس بدید.
نقل قول: کپی کردن dbchart
ممنون
یک فرم ساختم و روی آن یک dbchart گذاشتم و با این زیر برنامه کارم حل شد
procedure ShowChartInNewForm(var Chart: TDBChart;StationName,Title:string);
var
frm:TfrmShowChart;
i:Integer;
begin
frm:=TfrmShowChart.Create(nil);
try
frm.DBChart1.Assign(Chart);
while Chart.SeriesCount>0 do
frm.DBChart1.AddSeries(Chart.Series[0]);
frm.lblStationName.Caption:=StationName;
frm.lblTitle.Caption:=Title;
frm.ShowModal;
while frm.DBChart1.SeriesCount>0 do
Chart.AddSeries(frm.DBChart1.Series[0]);
finally
frm.Free;
end;
end;