Sub ResizeFormToNodeBounds(FormTarget As Form, NodeTarget As JavaObject)
If Not(NodeTarget Is Node) Then Return
'Get the scene position:
Dim Scene As JavaObject
Scene = NodeTarget.RunMethod("getScene",Null)
FormTarget.WindowWidth = NodeTarget.RunMethod("getPrefWidth", Null) + Scene.RunMethod("getX", Null)
FormTarget.WindowHeight = NodeTarget.RunMethod("getPrefHeight", Null) + Scene.RunMethod("getY", Null)
End Sub