...
GetInt() As Integer
Returns the event ID as an integer value of the object.
SetInt(value As Integer) As Void
Sets the integer value of the object. .
ifUserData
SetUserData(user_data As Object)
Sets the user data that will be returned when events are raised.
GetUserData() As Object
Returns the user data that has previously been set via SetUserData(). It will return Invalid if no data has been set.
ifSourceIdentity
GetSourceIdentity() As Integer
SetSourceIdentity() As IntegerInteger
| Note |
|---|
...
|
...
| |
The |
...
ifSourceIdentity interface has been deprecated. We recommend using the ifAudioUserData interface instead. |
ifData
GetData() As Integer
SetData(a As Integer)
...
| Code Block | ||
|---|---|---|
| ||
vp_msg_loop:
msg=Wait(tiut, p)
if type(msg)="roVideoEvent" then
if debug then print "Video Event";msg.GetInt()
if msg.GetInt() = 8 then
if debug then print "VideoFinished"
retcode=5
return
endif
else if type(msg)="roGpioButton" then
if debug then print "Button Press";msg
if escm and msg=BM then retcode=1:return
if esc1 and msg=B1 then retcode=2:return
if esc2 and msg=B2 then retcode=3:return
if esc3 and msg=B3 then retcode=4:return
else if type(msg)="rotINT32" then
if debug then print "TimeOut"
retcode=6
return
endif
goto vp_msg_loop |