copy/paste and access elements in App

app.lua

@@ -15,14 +15,33 @@ App = {
         LightColorscheme = {},
         DarkColorscheme = {}
     },
+    Interactions = {},
     Data = {
         Const = {},
         Var = {}
     }
 }
 
+-- register element and return its id
 function App:AddElement(element)
     table.insert(self._elements, element)
+    return #(self._elements)
+end
+
+-- execute a function as if it is running on an element
+function App:ElementExec(id, callback)
+    if id > #(self._elements) or id < 1 or (not Lib.Internal.IsRunnable(callback)) then return end
+    return callback(self._elements[id])
+end
+
+function App:ElValGet(id, key)
+    if id > #(self._elements) or id < 1 then return end
+    return App._elements[id][key]
+end
+
+function App:ElValSet(id, key, val)
+    if id > #(self._elements) or id < 1 then return end
+    App._elements[id][key] = val
 end
 
 -- initialize colorscheme, is called after Lib.Colors.* is initialized

events-system.lua

@@ -10,6 +10,10 @@ function on.construction()
     math.randomseed(timer:getMilliSecCounter())
     timer.start(App.RefreshRate)
 
+    if Lib.Internal.IsRunnable(App.Interactions.Copy) then toolpalette.enableCopy(true) end
+    if Lib.Internal.IsRunnable(App.Interactions.Cut) then toolpalette.enableCut(true) end
+    if Lib.Internal.IsRunnable(App.Interactions.Paste) then toolpalette.enablePaste(true) end
+
     if Lib.Internal.IsRunnable(init) then
         init()
     end

events-user.lua

@@ -98,3 +98,21 @@ end
 function on.help()
     Lib.Internal.ShowAboutDialog()
 end
+
+function on.copy()
+    if Lib.Internal.IsRunnable(App.Interactions.Copy) then
+        clipboard.addText(App.Interactions.Copy())
+    end
+end
+
+function on.cut()
+    if Lib.Internal.IsRunnable(App.Interactions.Cut) then
+        clipboard.addText(App.Interactions.Cut())
+    end
+end
+
+function on.paste()
+    if Lib.Internal.IsRunnable(App.Interactions.Paste) then
+        App.Interactions.Paste(clipboard.getText())
+    end
+end

library/gui.lua

@@ -13,6 +13,14 @@ function Lib.Gui.DrawFocusBox(x, y, w, h, gc)
     gc:setColorRGB(0, 0, 0)
 end
 
+function Lib.Gui.GenTextField(label, x, y)
+    local tf = Components.Base.TextField:new()
+    tf.Label = label
+    tf.PosX = x
+    tf.PosY = y
+    return tf
+end
+
 
 
 -- mutiline string draw based on nSpaint GUI engine