bilgisi olan varmı


Kod: Tümünü seç
procedure TForm1.frxReport1BeforePrint(Sender: TfrxReportComponent);
begin
if Sender.Name = 'Chart1' then
begin
TfrxChartView(Sender).Chart.Series[0].Clear;
TfrxChartView(Sender).Chart.Series[0].Add(25.20,'',clGray);
TfrxChartView(Sender).Chart.Series[0].Add(15.20,'',clSilver);
end;
end;