怪哉!你在对象浏览器里看看event页,有单击事件的!

解决方案 »

  1.   

    unit Unit1;interfaceuses
      Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
      ExtCtrls, jpeg;type
      TForm1 = class(TForm)
        Image1: TImage;
        procedure Image1Click(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;var
      Form1: TForm1;implementation{$R *.DFM}procedure TForm1.Image1Click(Sender: TObject);
    begin
    ShowMessage('有单击事件的!!!');
    end;end.
      

  2.   

      to rh
    我就是用的这个!
      

  3.   

      问题解决了,不过有点莫名其妙,我把Timage控件放在panel边上就能响应单击事件