cocos的容器 怎么有一种 VCL的感觉.
来看init()中的一段代码
// Create a "close" menu item with close icon, it's an auto release object.
CCMenuItemImage *pCloseItem = CCMenuItemImage::create(
"CloseNormal.png",
"CloseSelected.png",
this,
menu_selector(HelloWorld::menuCloseCallback));
这不是PASCAL么. 坑爹啊
var
pCloseItem : TCMenuItemImage
begin
pCloseItem := TCMenuItemImage.create(
'CloseNormal.png',
'CloseSelected.png',
Self,
menu_selector(HelloWorld.menuCloseCallback));
//==================华丽的分割线========================
this->addChild(pSprite, 0, 2); // 给"控件" 设置爸爸, 第三个参数是Tag
如果换成delphi版应该是这样
pSprite.Parent := self;
pSprite.Tag := 2;
void HelloWorld::myOnTimer(float fInterval)
{
CCSprite* pSprite = (CCSprite*)(this->getChildByTag(2)); // 这个2 就是上面设置的第三个参数
float f1 = pSprite->getRotation();
pSprite->setRotation( f1 + 1.0 );
}