[EXAMPLES]
* BUG: Fix keypress handling in BeastScroll and 3DWebCam. git-svn-id: svn://localhost/gambas/trunk@1019 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
parent
a2173e5752
commit
b54fab2aee
@ -123,7 +123,7 @@ PUBLIC SUB Screen_Close()
|
||||
|
||||
END
|
||||
|
||||
PUBLIC SUB Screen_KeyPressed()
|
||||
PUBLIC SUB Screen_KeyPress()
|
||||
|
||||
IF (key.Code = key.F1) THEN Screen.FullScreen = NOT Screen.FullScreen
|
||||
IF (key.Code = key.Esc) THEN Screen.Close()
|
||||
|
@ -237,9 +237,10 @@ PUBLIC SUB Screen_Draw()
|
||||
yrot += 0.2 ' Y Axis Rotation
|
||||
zrot += 0.4 ' Z Axis Rotation
|
||||
WAIT 0.05
|
||||
|
||||
END
|
||||
|
||||
PUBLIC SUB Screen_keyPressed()
|
||||
PUBLIC SUB Screen_keyPress()
|
||||
|
||||
IF key.Code = key.F1 THEN Screen.Fullscreen = NOT Screen.Fullscreen
|
||||
IF key.Code = key.Esc THEN Screen.Close()
|
||||
@ -251,4 +252,5 @@ PUBLIC SUB Timer1_Timer()
|
||||
logo = hWebCam.Image
|
||||
|
||||
UpdateLogo = TRUE
|
||||
|
||||
END
|
||||
|
Loading…
x
Reference in New Issue
Block a user