[NeiL]

Господа программисты, возник вопрос: Имеется форма на которой расположены два ListBox.
Необходимо вывести имя того ListBox'а над которым находится курсор (ApplicationEvents - OnIdle). Я реализовал такую возможность через отслеживание координат (ClientOrigin).
Может можно реализовать это как-нибудь по другому.

[AlexSku]

У компонентов используйте события OnMouseMove. Можно к каждому компоненту привязать свой обработчик:
S:= 'ListBox1';
потом используйте эту S. Можно один обработчик привязать ко всем компонентам:

Код:

procedure TForm1.ComponMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  if Sender is TListBox then
    S:= (Sender as TComponent).Name;
end;

(S: string)