Du kannst alles auf einer Routine in Deinem Mainform umbiegen und dort den Sender, bzw den Owner des Senders ermitteln, ungeprüft und ohne Sicherheitsabfragen nur ein Beispiel....
Delphi-Quellcode:
Procedure Mainform.SetColor(Sender:TObject);
begin
TForm(TComponent(Sender).Parent).Color := TComponent(Sender).Tag;
end;