要求当鼠标离开Groupbox的范围时相应某一事件,我该怎么作呢

Question

用事件阿：
procedure TForm1.GroupBox1Exit(Sender: TObject);
beginend;
如果你的范围是指GroupBox中的某个范围，可以在GroupBox1MouseMove事件中判断鼠标位置。
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
I.Explain := '假如上述代码中出现“OA”、“3D”等字样，改为“=”或者去掉';
I.Desire := '加不加分随你';
—————————————————————————————————
    

Answer 1

在groupbox的窗口函数中拦截cm-mouseleave消息

Answer 2

同意 happyjoe(尘土飞扬) ;