We would like to build a community for Small Basic programmers of any age who like to code. Everyone from total beginner to guru is welcome. Click here to register and share your programming journey!


Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
GraphicsWindow.LastKey
#6
Please try the subroutine method which sets key and Lastkey before the loop, you don't appear to be doing this.

This works every time for me, so I feel there may be something else going on in your program and would like to understand that first.  There are other ways also to just wait for a Return key press as I suggested so don't want to add a 'weird hack' feature to change something that I think may be covering up some other issue and could get you or others into other problems.

Can you share an actual (simplified if possible) program that shows the issue I can reproduce, using the WaitForReturnKey subroutine below.

Code:
GraphicsWindow.Show()

While ("True")
  WaitForReturnKey()
  GraphicsWindow.BackgroundColor = GraphicsWindow.GetRandomColor()
EndWhile

Sub WaitForReturnKey
  key = "" 'Make sure key isn't initially Return before LastKey sets it
  LDTextWindow.SendKey(GraphicsWindow.Title,"Space") 'Send a Space key so initially LastKey is not Return
  Program.Delay(10)
  While key <> "Return"
    key = GraphicsWindow.Lastkey
    Program.Delay(10) 'Don't mash cpu
  EndWhile
EndSub

Another way to do it:

Code:
GraphicsWindow.Show()
GraphicsWindow.KeyDown = OnKeyDown

While ("True")
  WaitForReturnKey()
  GraphicsWindow.BackgroundColor = GraphicsWindow.GetRandomColor()
EndWhile

Sub WaitForReturnKey
  key = ""
  While (key <> "Return")
    Program.Delay(10)
  EndWhile
EndSub

Sub OnKeyDown
  key = GraphicsWindow.LastKey
EndSub

And another:

Code:
GraphicsWindow.Show()

While ("True")
  WaitForReturnKey()
  GraphicsWindow.BackgroundColor = GraphicsWindow.GetRandomColor()
EndWhile

Sub WaitForReturnKey
  While (LDUtilities.KeyDown("Return") <> "True")
    Program.Delay(10)
  EndWhile
EndSub
Reply


Messages In This Thread
GraphicsWindow.LastKey - by jrmrhrb00 - 01-15-2025, 01:37 PM
RE: GraphicsWindow.LastKey - by litdev - 01-15-2025, 02:09 PM
RE: GraphicsWindow.LastKey - by jrmrhrb00 - 01-15-2025, 02:58 PM
RE: GraphicsWindow.LastKey - by litdev - 01-15-2025, 03:18 PM
RE: GraphicsWindow.LastKey - by jrmrhrb00 - 01-15-2025, 03:58 PM
RE: GraphicsWindow.LastKey - by litdev - 01-15-2025, 05:05 PM
RE: GraphicsWindow.LastKey - by jrmrhrb00 - 01-15-2025, 05:33 PM
RE: GraphicsWindow.LastKey - by litdev - 01-15-2025, 06:47 PM
RE: GraphicsWindow.LastKey - by jrmrhrb00 - 01-15-2025, 07:56 PM
RE: GraphicsWindow.LastKey - by litdev - 01-15-2025, 08:43 PM
RE: GraphicsWindow.LastKey - by AbsoluteBeginner - 01-16-2025, 07:58 AM
RE: GraphicsWindow.LastKey - by litdev - 01-16-2025, 11:59 AM
RE: GraphicsWindow.LastKey - by jrmrhrb00 - 01-16-2025, 02:36 PM
RE: GraphicsWindow.LastKey - by z-s - 01-17-2025, 05:02 PM
RE: GraphicsWindow.LastKey - by litdev - 01-17-2025, 07:24 PM
RE: GraphicsWindow.LastKey - by z-s - 01-18-2025, 10:29 AM
RE: GraphicsWindow.LastKey - by litdev - 01-18-2025, 01:41 PM

Forum Jump:


Users browsing this thread: 8 Guest(s)