Keyboard input/Obtain a Y or N response: Difference between revisions
Keyboard input/Obtain a Y or N response (view source)
Revision as of 07:39, 25 June 2022
, 1 year ago→{{header|FutureBasic}}
No edit summary |
|||
Line 920:
=={{header|FutureBasic}}==
<lang futurebasic>void local fn DoDialog( ev as long )
CFStringRef key
case _windowKeyDown
cls
key = fn EventCharacters
case @"Y", @"y",@"N",@"n"
printf @"You pressed the \"%@\" key",key
DialogEventSetBool(YES)// we handled the event
end select▼
end select▼
end fn▼
subclass
window 1, @"Press \"Y\" or \"N\" keys", (0,0,550,400)
▲select case( ev )
▲ select id
▲ end select
▲ end select
▲end fn
on dialog fn DoDialog
HandleEvents</lang>
=={{header|GlovePIE}}==
|