Sub ResizeToFit(tv As TableView, ColumnIndex As Int)
Dim tvjo As JavaObject = tv
Dim r As Reflector
r.Target = tvjo.RunMethod("getSkin", Null)
r.RunMethod4("resizeColumnToFitContent", Array(tvjo.RunMethodJO("getColumns", Null).RunMethod("get", Array(ColumnIndex)), -1), _
Array As String("javafx.scene.control.TableColumn", "java.lang.int"))
End Sub