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
#10
I don't think there is currently a way to set focus on GW, but there are other ways to get the Return key without Lastkey/SendKey.  Here is another one:

Code:
GraphicsWindow.Show()
mtb = Controls.AddMultiLineTextBox(10,10) 'Multi-line will allow return
Controls.SetSize(mtb,100,21) 'Size to show 1 line only, just big enough to not need vertical scroll bar
LDFocus.SetFocus(mtb)

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

Sub WaitForReturnKey
  char = ""
  While (char <> Text.GetCharacter(10)) 'Ascii 10 is LF (Return)
    tb = Controls.LastTypedTextBox
    text = Controls.GetTextBoxText(tb)
    len = Text.GetLength(text)
    char = Text.GetSubText(text,len,1) 'last character will be LF if Return was pressed
    Program.Delay(10)
  EndWhile
  Controls.SetTextBoxText(tb,"") 'Clear text
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: 7 Guest(s)