Здравствуйте, Eagle-XK, Вы писали:

EX>Проверь сам...

Я не заметил, что панелька у тебя закрыта другим контролом. Тогда может подойдет нечто такое:

procedure TForm1.TmrTimer(Sender: TObject);
var
    Control: TWinControl;
begin
    Control := FindControl(WindowFromPoint(Mouse.CursorPos));
    while Assigned(Control) and (Control <> Pnl) do
        Control := Control.Parent;
    if Control = Pnl then
        Beep;
end;