OnMouseOver bei selbst erzeugtem TPicture

[Khabarakh]

Du könntest jedes Control ableiten und TControl.MouseMove überschreiben. Willst du aber wohl eher nicht .
Oder:

Delphi-Quellcode:

// in einer Methode der Form, z.B. im OnCreate-Eventhandler
for i := 0 to ComponentCount do
  if Components[i] is TControl then
    TControl(Components[i]).OnMouseMove := MyEventHandler;

MyEventHandler muss natürlich die Parameter von TMouseMoveEvent besitzen.