kiss-lang/kiss-flixel
1
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases Wiki Activity

fully show last control in vertical SimpleWindow

Browse Source
This commit is contained in:
Nat Quayle Nelson
2023-07-10 13:57:40 -06:00
parent 3879945659
commit 192ed4e49e
2 changed files with 14 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
src/kiss_flixel/SimpleWindow.kiss
View File

@@ -115,7 +115,7 @@
:String upKey (or _upKey defaultUpKey)
:String downKey (or _downKey defaultDownKey)
:String enterKey (or _enterKey defaultEnterKey)
:ShortcutAction onClose _onClose
&mut :ShortcutAction onClose _onClose
:FlxTypedGroup<FlxSprite> controls (new FlxTypedGroup)
:FlxKeyShortcutHandler<ShortcutAction> keyHandler (new FlxKeyShortcutHandler)
// The xHandler exists so that when keyboard shortcuts are disabled,
@@ -282,8 +282,9 @@
(apply or (for _ (range SCROLL_LINES) (_scrollDown))))
(method :Bool _scrollDown []
(let [:kiss.List<FlxSprite> controls (_nonUIControls)]
(when (< .y (last controls) _height)
(let [:kiss.List<FlxSprite> controls (_nonUIControls)
lastControl (last controls)]
(when (< (+ lastControl.y lastControl.height) _height)
(return false))
(doFor c controls
(-= c.y c.height)