Ich würde sagen
Game.HoverImage.OnClick:= Game.FieldClick;
und in der Procedur
Delphi-Quellcode:
procedure TGame.Field.OnClick(Sender: TObject);
begin
if Sender = ????? then
end
ansonsten schwer zu verstehen was Du genau willst!?
oder
Delphi-Quellcode:
procedure TGame.OnFieldEnter(Sender: TObject);
...
begin
...
Game.HoverImageClick(Sender);
end;
gruss alfold