B4J Question set Proxy to avoid CORS

Sub Process_Globals
    Dim ho As String
    Dim po As Int
End Sub

Sub AppStart (Args() As String)
    ho="192.168.043.075"    'local ip
    po=8080
 
    Dim j As HttpJob
    j.Initialize("j", Me)
    'SetSystemProperty("http.proxyHost", "localhost")
    'SetSystemProperty("http.proxyPort", "8080")
 
    j.Download("https://www.b4x.com/images/Logo_on-dark.png")
 
    StartMessageLoop
End Sub

Sub JobDone(j As HttpJob)
    Log(j.GetString)
    StopMessageLoop
End Sub

Sub Initialize
    If hc.IsInitialized = False Then
        TempFolder = File.DirTemp
        Dim jo As JavaObject = hc
        Dim proxy, socketAddress As JavaObject
        socketAddress.InitializeNewInstance("java.net.InetSocketAddress", Array (Main.Ho, Main.Po))
        proxy.InitializeNewInstance("java.net.Proxy", Array ("HTTP", socketAddress))
        Dim builder As JavaObject = jo.RunMethod("sharedInit", Array("hc"))

        builder.RunMethod("proxy", Array(proxy)) '<---- fixed!!!
        jo.SetField("client", builder.RunMethod("build", Null))
        TaskIdToJob.Initialize
    End If
End Sub