Du kannst das aber auch so schreiben:
Delphi-Quellcode:
if (TabSheet6.ControlAtPos(TabSheet6.ScreenToClient(mouse.CursorPos), true, true))= Groupbox1)
or (TabSheet6.ControlAtPos(TabSheet6.ScreenToClient(mouse.CursorPos), true, true))= Groupbox3)
or (TabSheet6.ControlAtPos(TabSheet6.ScreenToClient(mouse.CursorPos), true, true))= Groupbox4) then
begin
Label36.Visible:=True;
Label36.BringToFront;
Timer2.Enabled:=True;
end;