OnKeyUp event

Started by pawlix · 2024-07-30 16:04 UTC · 2 replies · SMF topic #2932

pawlix 2024-07-30 16:04 UTC

Hello guys!
I'm kinda new in this world, could someone help me with OnKeyUp event?
I would love to use it in my ListView by pressing SpaceBar but I have no clue how to do that becouse of those Characters and Flags :/
Currently my code seems like this:

(defun c:project/Form4/ListView1#OnKeyUp (Character RepeatCount Flags /)
(setq Character "SpaceBar")
(setq RepeatCount 0)
(setq Flags 0)
(alert "OK")
)

Can someone help me?

owenwengerd 2024-07-30 16:16 UTC

Try this:



(defun c:project/Form4/ListView1#OnKeyUp (Character RepeatCount Flags /)

  (if (= Character " ") (alert "SPACEBAR was released"))

)

pawlix 2024-07-30 16:21 UTC

It does nothing. I just want that if I release SpaceBar then alert popup. Nothing else.
Do I need to do something more then just put that in my lisp code?
Obviusly keyup event is checked in opendcl project

Edit:
I think I handle it, but I have got more questions about it.
How to code it for Delete key?
Where and how should I put Flags?

Edit2:
I got it all. Thanks for your replay @owenwengerd, it was helpful. We can close the topic.