OnMouseOver bei Array of TPanel

[stahli]

Ach so, Du willst es weiterhin als Ereignisbehandlung im Formular lassen...
Dann musst Du vorhaer allen Panels die gleiche Ereignisbehandlung zuweisen und Dich dann auf den Auslöser des Ereignisses beziehen:

Delphi-Quellcode:

procedure TForm1.PanelsMouseOver(Sender: TObject);
var
  MyPanel: TPanel;
begin
  if Sender is TPanel then
  begin
    MyPanel := (Sender as TPanel);
    MyPanel.Visible := False;
  end;
end;

Ob ein MyPanel.Free an der Stelle zu Problemen führen könnte kann ich jetzt nicht ausschließen. Man sollte das sicher nicht tun, da der "Rest" der Mausreaktion in dem dann zerstörten Panel noch ausgeführt wird.