OnMouseDown-Ereignis bei dynamisch erstelltem Image

[Orbmu2k]

die procedure gehört ja auch zu deiner Form Klasse und nicht zum Image Control

so sollte es passen

Delphi-Quellcode:

TForm1 = class(TForm)
  private
  protected
  public
    procedure MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
  end;

procedure TForm1.MouseDown(Sender: TObject;Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
    showmessage('hallo');
end;