xlua 面向对象

acecase

1. --[[-- Lua面向对象设计
2. --]]--保存类类型的虚表
3. local _class ={}
4. local _className ={}
6. ClassType ={
7.         class =1,
8.         instance =2,}
10. function BaseClass(classname, super)assert(type(classname)=="string" and #classname >0)-- 生成一个类类型
11.         local class_type ={}-- 在创建对象的时候自动调用
12.         class_type.__init = false
13.         class_type.__delete = false
14.         class_type.__cname = classname
15.         class_type.__ctype = ClassType.class
16.        
17.         class_type.super = super
18.         class_type.New =function(...)-- 生成一个类对象
19.                 local obj ={}
20.                 obj._class_type = class_type
21.                 obj.__ctype = ClassType.instance
22.                
23.                 -- 在初始化之前注册基类方法
24.                 setmetatable(obj,{
25.                         __index = _class[class_type],})-- 调用初始化方法
26.                 do
27.                         local create
28.                         create =function(c,...)if c.super then
29.                                         create(c.super,...)
30.                                 end
31.                                 if c.__init then
32.                                         c.__init(obj,...)
33.                                 end                               
34.                         end
35.                         create(class_type,...)
36.                 end
38.                 -- 注册一个delete方法
39.                 obj.Delete =function(self)if self.__isDeleted then
40.                                 Logger.LogError(string.format("Trying to delete object which was already deleted. %s", table.dump(self)));return;
41.                         end
42.                         if(DebugManager ~= nil and DebugManager:LogDeleteCall())then
43.                                 Logger.Log(" Delete self : "..tostring(self).."\n"..truncate(table.dump(self),1024))
44.                         end                       
45.                         self.__isDeleting = true;
46.                         local now_super = self._class_type
47.                         while now_super ~= nil doif now_super.__delete then
48.                                         now_super.__delete(self)
49.                                 end
50.                                 now_super = now_super.super
51.                         end
52.                         self.__isDeleting = nil;
53.                         self.__isDeleted = true;
54.                 end
55.                 obj.GetClassType =function(self)return self._class_type;
56.                 end
57.                 obj.IsAlive =function(self)return not self:IsDeleting() and not self:IsDeleted();
58.                 end
59.                 obj.IsDeleting =function(self)return self.__isDeleting;
60.                 end
61.                 obj.IsDeleted =function(self)return self.__isDeleted;
62.                 end
63.                 if(DebugManager ~= nil and DebugManager:LogCreateCall())then
64.                         Logger.Log(" Create : "..tostring(obj).."\n"..truncate(table.dump(obj),1024))
65.                 end
66.                 return obj
67.         end
69.         local vtbl ={}assert(_class[class_type]== nil,"Aready defined class : ", classname)
70.         _class[class_type]= vtbl
71.         _className[classname]= class_type
73.         setmetatable(class_type,{
74.                 __newindex =function(t,k,v)
75.                         vtbl[k]= v
76.                 end
77.                 ,--For call parent method
78.                 __index = vtbl,})if super then
79.                 setmetatable(vtbl,{
80.                         __index =function(t,k)
81.                                 local ret = _class[super][k]--do not do accept, make hot update work right!--vtbl[k]= ret
82.                                 return ret
83.                         end
84.                 })
85.         end
87.         return class_type
88. end
90. function Class(className)return _className[className];
91. end

复制代码

当你需要继承的时候可以使用

1. local UIOperateTipPanel =BaseClass("UIOperateTipPanel", UIBaseView)

复制代码