RiverSoftAVG Products Help

Delphi

public
  property OnDrawForeground: TRSChartDrawEvent read GetOnDrawForeground write SetOnDrawForeground;
 

The following example displays a copyright notice in the lower right area of the foreground:

Delphi

procedure TForm1.RSChartPanel1DrawForeground(Sender: TObject;
   const Canvas: TCanvas; ARect: TRect);
 begin
      // Note, we set the Foreground to Visible and its Brush to bsClear so that it does not truly draw
      Canvas.Font.Name := 'Papyrus';
      Canvas.Font.Size := 12;
      Canvas.TextOut( ARect.Right - Canvas.TextWidth('Copyright 2006, RiverSoftAVG.com')-25,
                      ARect.Bottom - Canvas.TextHeight('C')*2,
                      'Copyright 2006, RiverSoftAVG.com' );
 end;

Reference

•RSChartPanel.TRSCustomChartPanel.OnDrawingForeground

•RSChartPanel.TRSCustomChartPanel.Foreground

•TRSCustomChartPanel

•RSChartPanel