Leica tps1100, Руководство пользователя, Страница: 857 / 1154

GeoBASIC Reference Manual 6. System Functions
TPS1100-Version 2.10 6-24
Example The example uses the MMI_CheckButton routine to wait until a
(valid) key was pressed.
DIM lKeyPressed AS Logical
DO
MMI_
CheckButton( lKeyPressed )
LOOP UNTIL lKeyPressed
'do something ..
6.1.15 MMI_GetButton
Description Get the button identifier of the pressed button.
Declaration
MMI_GetButton( iButtonId AS Integer,
BYVAL lAllKeys AS Logical )
Remarks Waits until a valid key is pressed and returns the button Identifier
iButtonId
of the pressed button.
If
lAllKeys = FALSE
, the keys
ESC
,
ENTER
,
ON/OFF
or any
assigned button (added with
MMI_AddButton
) terminates this
function and the
iButtonId
of the pressed button is returned. If
lAllKeys = TRUE,
additional keys i.e. the cursor keys
terminates this routine too. For details see table below.
Note This function relates to the currently active dialog.
Parameters
iButtonId Out The identifier of the pressed button. For
values of
iButtonId
see the table
below.
lAllKeys In Determines which keys exit the routine. If
lAllKeys = TRUE any valid pressed
key exit the routine, otherwise only
normal ones.