diff --git a/components/tachart/tadrawerfpcanvas.pas b/components/tachart/tadrawerfpcanvas.pas
index cdfc036a45..06516e3adf 100644
--- a/components/tachart/tadrawerfpcanvas.pas
+++ b/components/tachart/tadrawerfpcanvas.pas
@@ -215,7 +215,7 @@ begin
   Unused(AX1, AY1);
   Unused(AX2, AY2);
   Unused(AStartAngle16Deg, AAngleLength16Deg);
-  raise EChartError.Create('TOpenGLDrawer.RadialPie not implemented');
+  raise EChartError.Create('TFPCanvasDrawer.RadialPie not implemented');
 end;
 
 procedure TFPCanvasDrawer.Rectangle(AX1, AY1, AX2, AY2: Integer);