Signed-off-by: Alexis Laferrière <alexis.laf@xymus.net>
end
end
+redef class Label
+ redef type NATIVE: NativeTextView
+ redef var native do return (new NativeTextView(app.native_activity)).new_global_ref
+end
+
redef class TextInput
redef type NATIVE: NativeEditText
redef var native = (new NativeEditText(app.native_activity)).new_global_ref
super TextView
end
+# A text label
+class Label
+ super TextView
+end
+
# A `Button` press event
class ButtonPressEvent
super AppEvent
init do native.signal_connect("clicked", self, null)
end
+redef class Label
+ redef type NATIVE: GtkLabel
+ redef var native = new GtkLabel("")
+
+ redef fun text do return native.text
+ redef fun text=(value) do native.text = (value or else "").to_s
+end
+
redef class TextInput
redef type NATIVE: GtkEntry
redef var native = new GtkEntry