paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-12 18:39:52 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart: Add TChart.RemoveSeries as TeeChart-compatible synonym for DeleteSeries

Browse Source 
git-svn-id: trunk@36911 -
This commit is contained in:
ask 2012-04-19 16:15:17 +00:00
parent a56c51b330
commit fd03e9f920
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/tachart/tagraph.pas
View File

@ -300,6 +300,7 @@ type
procedure PaintOnAuxCanvas(ACanvas: TCanvas; ARect: TRect); procedure PaintOnAuxCanvas(ACanvas: TCanvas; ARect: TRect);
procedure PaintOnCanvas(ACanvas: TCanvas; ARect: TRect); procedure PaintOnCanvas(ACanvas: TCanvas; ARect: TRect);
procedure Prepare; procedure Prepare;
procedure RemoveSeries(ASeries: TBasicChartSeries); inline;
procedure SaveToBitmapFile(const AFileName: String); inline; procedure SaveToBitmapFile(const AFileName: String); inline;
procedure SaveToFile(AClass: TRasterImageClass; AFileName: String); procedure SaveToFile(AClass: TRasterImageClass; AFileName: String);
function SaveToImage(AClass: TRasterImageClass): TRasterImage; function SaveToImage(AClass: TRasterImageClass): TRasterImage;
@ -1218,6 +1219,11 @@ begin
end; end;
end; end;
procedure TChart.RemoveSeries(ASeries: TBasicChartSeries);
begin
DeleteSeries(ASeries);
end;
procedure TChart.SaveToBitmapFile(const AFileName: String); procedure TChart.SaveToBitmapFile(const AFileName: String);
begin begin
SaveToFile(TBitmap, AFileName); SaveToFile(TBitmap, AFileName);