从Delphi开始学Cocos2dx-3.0[5]:鼠标按下移动弹起与单点触摸

在Delphi 里面的三个基本的鼠标操作事件是

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Single);
begin

end;

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Single);
begin

end;

procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Single);
begin

end;

再 cocos里面其实也是差不多的

首先重写 Layer的 onEnter函数

//HelloWorldScene.h


 virtual void onEnter() override;

然后在onEnter里面绑定事件

void THelloWorld::onEnter()
{
	TLayer::onEnter();  

	// 创建一个监听事件
	auto listener = TEventListenerTouch::create(dmOneByOne);
	//如果不加入此句消息依旧会向下传递 
    listener->setSwallowTouches(true);
    
	// 绑定事件
    listener->onTouchBegan = CC_CALLBACK_2(THelloWorld::onTouchBegan, this);
    listener->onTo