在直接继承TImage的自定义控件中override Paint事件,为什么在paint中陷入循环?

Question

在直接继承TImage的自定义控件中override Paint事件
procedure TMyImage.Paint;
begin
  inherited Paint;  if  not (csDesigning in ComponentState) then
     DrawEdge; // 在程序运行时为该控件的周围画出与TImage设计时四周的虚线框及
              //八个黑点.DrawEdge中多次用到Canvas.Rectangle()   end;
是否因为在DrawEdge中使用了Rectangle()导致TMyImage不停地调用Paint?
如果是这样有什么方法可以先画出继承的Image,再画出Image四周的虚线框?