Equivalent for SetTextScaleX in b4a?

Hi,

How to emulate this B4A function in B4i ? Thanks

Code:

  Dim s As Float
Dim r As Reflector
Dim v as Panel
Dim c As Canvas

v.Initialize("")
c.Initialize(v)

s = 0.9

r.Target = c
r.Target = r.GetField("paint")
r.RunMethod2("setTextScaleX", s, "java.lang.float")  

from B4X Community - Android, iOS, desktop, server and IoT programming tools http://ift.tt/2a7qgUE
via IFTTT