B4J Question MouseCursor (Help)

[BeneBarros]

in fx.Cursors not have the H_RESIZE and V_RESIZE options.
how to do this at runtime?

 

[Erel]

  MainForm.RootPane.MouseCursor = GetMouseCursor("V_RESIZE")


Sub GetMouseCursor(Name As String) As Object
   Dim jo As JavaObject
   Return jo.InitializeStatic("javafx.scene.Cursor").GetField(Name)
End Sub

 

[BeneBarros]

  MainForm.RootPane.MouseCursor = GetMouseCursor("V_RESIZE")


Sub GetMouseCursor(Name As String) As Object
   Dim jo As JavaObject
   Return jo.InitializeStatic("javafx.scene.Cursor").GetField(Name)
End Sub

thank Erel