comparison Libs/DF/label.lua @ 39:7944c081e5b4

- framework update. - ToC Update.
author Tercio
date Tue, 19 Jul 2016 13:23:40 -0300
parents 5da06cb420d4
children 0682d738499b
comparison
equal deleted inserted replaced
38:219f04e5ba55 39:7944c081e5b4
13 local _math_floor = math.floor --> lua local 13 local _math_floor = math.floor --> lua local
14 local loadstring = loadstring --> lua local 14 local loadstring = loadstring --> lua local
15 15
16 local cleanfunction = function() end 16 local cleanfunction = function() end
17 local APILabelFunctions = false 17 local APILabelFunctions = false
18 local LabelMetaFunctions = {} 18
19 do
20 local metaPrototype = {
21 WidgetType = "label",
22 SetHook = DF.SetHook,
23 RunHooksForWidget = DF.RunHooksForWidget,
24 }
25
26 _G [DF.GlobalWidgetControlNames ["label"]] = _G [DF.GlobalWidgetControlNames ["label"]] or metaPrototype
27 end
28
29 local LabelMetaFunctions = _G [DF.GlobalWidgetControlNames ["label"]]
19 30
20 ------------------------------------------------------------------------------------------------------------ 31 ------------------------------------------------------------------------------------------------------------
21 --> metatables 32 --> metatables
22 33
23 LabelMetaFunctions.__call = function (_table, value) 34 LabelMetaFunctions.__call = function (_table, value)
56 local gmember_textsize = function (_object) 67 local gmember_textsize = function (_object)
57 local _, fontsize = _object.label:GetFont() 68 local _, fontsize = _object.label:GetFont()
58 return fontsize 69 return fontsize
59 end 70 end
60 71
61 72 LabelMetaFunctions.GetMembers = LabelMetaFunctions.GetMembers or {}
62 local get_members_function_index = { 73 LabelMetaFunctions.GetMembers ["shown"] = gmember_shown
63 ["shown"] = gmember_shown, 74 LabelMetaFunctions.GetMembers ["width"] = gmember_width
64 ["width"] = gmember_width, 75 LabelMetaFunctions.GetMembers ["height"] = gmember_height
65 ["height"] = gmember_height, 76 LabelMetaFunctions.GetMembers ["text"] = gmember_text
66 ["text"] = gmember_text, 77 LabelMetaFunctions.GetMembers ["fontcolor"] = gmember_textcolor
67 ["fontcolor"] = gmember_textcolor, 78 LabelMetaFunctions.GetMembers ["fontface"] = gmember_textfont
68 ["fontface"] = gmember_textfont, 79 LabelMetaFunctions.GetMembers ["fontsize"] = gmember_textsize
69 ["fontsize"] = gmember_textsize, 80 LabelMetaFunctions.GetMembers ["textcolor"] = gmember_textcolor --alias
70 ["textcolor"] = gmember_textcolor, --alias 81 LabelMetaFunctions.GetMembers ["textfont"] = gmember_textfont --alias
71 ["textfont"] = gmember_textfont, --alias 82 LabelMetaFunctions.GetMembers ["textsize"] = gmember_textsize --alias
72 ["textsize"] = gmember_textsize --alias
73 }
74 83
75 LabelMetaFunctions.__index = function (_table, _member_requested) 84 LabelMetaFunctions.__index = function (_table, _member_requested)
76 85
77 local func = get_members_function_index [_member_requested] 86 local func = LabelMetaFunctions.GetMembers [_member_requested]
78 if (func) then 87 if (func) then
79 return func (_table, _member_requested) 88 return func (_table, _member_requested)
80 end 89 end
81 90
82 local fromMe = _rawget (_table, _member_requested) 91 local fromMe = _rawget (_table, _member_requested)
155 --> outline (shadow) 164 --> outline (shadow)
156 local smember_outline = function (_object, _value) 165 local smember_outline = function (_object, _value)
157 DF:SetFontOutline (_object.label, _value) 166 DF:SetFontOutline (_object.label, _value)
158 end 167 end
159 168
160 local set_members_function_index = { 169 LabelMetaFunctions.SetMembers = LabelMetaFunctions.SetMembers or {}
161 ["show"] = smember_show, 170 LabelMetaFunctions.SetMembers["show"] = smember_show
162 ["hide"] = smember_hide, 171 LabelMetaFunctions.SetMembers["hide"] = smember_hide
163 ["align"] = smember_textalign, 172 LabelMetaFunctions.SetMembers["align"] = smember_textalign
164 ["valign"] = smember_textvalign, 173 LabelMetaFunctions.SetMembers["valign"] = smember_textvalign
165 ["text"] = smember_text, 174 LabelMetaFunctions.SetMembers["text"] = smember_text
166 ["width"] = smember_width, 175 LabelMetaFunctions.SetMembers["width"] = smember_width
167 ["height"] = smember_height, 176 LabelMetaFunctions.SetMembers["height"] = smember_height
168 ["fontcolor"] = smember_textcolor, 177 LabelMetaFunctions.SetMembers["fontcolor"] = smember_textcolor
169 ["color"] = smember_textcolor,--alias 178 LabelMetaFunctions.SetMembers["color"] = smember_textcolor--alias
170 ["fontface"] = smember_textfont, 179 LabelMetaFunctions.SetMembers["fontface"] = smember_textfont
171 ["fontsize"] = smember_textsize, 180 LabelMetaFunctions.SetMembers["fontsize"] = smember_textsize
172 ["textcolor"] = smember_textcolor,--alias 181 LabelMetaFunctions.SetMembers["textcolor"] = smember_textcolor--alias
173 ["textfont"] = smember_textfont,--alias 182 LabelMetaFunctions.SetMembers["textfont"] = smember_textfont--alias
174 ["textsize"] = smember_textsize,--alias 183 LabelMetaFunctions.SetMembers["textsize"] = smember_textsize--alias
175 ["shadow"] = smember_outline, 184 LabelMetaFunctions.SetMembers["shadow"] = smember_outline
176 ["outline"] = smember_outline,--alias 185 LabelMetaFunctions.SetMembers["outline"] = smember_outline--alias
177 }
178 186
179 LabelMetaFunctions.__newindex = function (_table, _key, _value) 187 LabelMetaFunctions.__newindex = function (_table, _key, _value)
180 local func = set_members_function_index [_key] 188 local func = LabelMetaFunctions.SetMembers [_key]
181 if (func) then 189 if (func) then
182 return func (_table, _value) 190 return func (_table, _value)
183 else 191 else
184 return _rawset (_table, _key, _value) 192 return _rawset (_table, _key, _value)
185 end 193 end
303 311
304 if (size and type (size) == "number") then 312 if (size and type (size) == "number") then
305 DF:SetFontSize (LabelObject.label, size) 313 DF:SetFontSize (LabelObject.label, size)
306 end 314 end
307 315
308 316 LabelObject.HookList = {
317 }
309 318
310 LabelObject.label:SetJustifyH ("LEFT") 319 LabelObject.label:SetJustifyH ("LEFT")
311 320
312 setmetatable (LabelObject, LabelMetaFunctions) 321 setmetatable (LabelObject, LabelMetaFunctions)
313 322