enter numbers and positions

This commit is contained in:
2023-02-15 15:24:33 -07:00
parent b2bd893300
commit 76ab41dd97
3 changed files with 51 additions and 6 deletions

View File

@@ -41,12 +41,14 @@
(when ui.controller (.switchPlaygroundKey (ui.playgroundSystem) .name (pgTabs.getChild tab))))
(prop &mut :String->Void resolveString null)
(method :Void _on_LineEdit_text_entered [:String text]
(let [rs resolveString]
(set resolveString null)
(rs text)))
(prop &mut :Position->Void resolvePosition null)
(method &override &public :Void _Input [:InputEvent event]
(typeCase [event]
([:InputEventMouseButton mouseButtonEvent]
@@ -54,4 +56,12 @@
(whenLet [rp resolvePosition]
(set resolvePosition null)
(rp (GodotUI.vector2ToPosition (.getMousePosition (getViewport)))))))
(otherwise)))
(otherwise)))
(prop &mut :Float->Void resolveFloat)
(method :Void _on_NaNButton_pressed []
(resolveFloat Math.NaN))
(method :Void _on_SubmitNumberButton_pressed [:SpinBox spinBox]
(resolveFloat spinBox.value))