### Add OnScroll Event

Example of adding a OnScroll event to a node by using a JavaObject.
`Sub Process_Globals
Private fx As JFX
Private MainForm As Form
End Sub`
`Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
MainForm.Show
Dim jo As JavaObject = MainForm.RootPane
Dim e As Object = jo.CreateEventFromUI("javafx.event.EventHandler", "scroll", Null)
jo.RunMethod("setOnScroll", Array(e))
End Sub`
`Sub Scroll_Event (MethodName As String, Args() As Object) As Object
Dim scrollevent As JavaObject = args(0)
Log(scrollevent.RunMethod("getDeltaY", Null))
Return Null
End Sub`

Changed: , Category: Nodes, File: T6C225M1662.htm, ID: 1662