现在有这样一段程序:
 TestPanel=class(TPanel)
 protected
    procedure MouseDown(Button: TMouseButton; Shift: TShiftState;
      X, Y: Integer); override;
 end; 
procedure TestPanel.MouseDown(Button: TMouseButton; Shift: TShiftState;
  X, Y: Integer);
begin
  inherited;
    if (csDesigning in Self.ComponentState) then
    begin
       showMessage('exit form mouse down1');
    end;
    showMessage('exit form mouse down2');
end;
现在我在画面上放上这样一个Panel,在该Panel上点击时,两个message都没有被打出来,如果运行时在该Panel上点击时,第二个message会被打出来,不知为什么第一个message在设计时不会并打出来呢?是不是只有像Paint等过程才会在设计时期被调用?
还望高手多多指教?多谢多谢!