Question

delphi 事件的传递?????????????拜托各位了 3Q

在一个Tform中放置一个Timage,在这个image之上再放置一个Timage,在此,为了方便,称第一个为image1,第二个为image2,image2的面积小与image1,并且在image2之上,当我点击image2时,我想要image1接受这个消息,而image2不接受,我所说的不接受是在一定的情况下,有时也要image2接受,但在image2不接受时不允许用onclick:=image1.onclick,也不允许image2.enable:=false.我要它们时时都有效.请各位高手指点一二.谢谢.

Answer 1

//参考procedure TForm1.Image2Click(Sender: TObject);begin if True{ TODO : 你要 } then begin Image1.OnClick(Image1) Exit; end;end; 查看原帖>>

麻烦采纳，谢谢!