[Hwgui-developers] Small fix

[Itamar M. L. J. L. <ita...@gm...>]

METHOD Refresh()  CLASS HEdit
   LOCAL vari

   IF hb_isBlock(::bSetGet) //::bSetGet != Nil
      vari := Eval( ::bSetGet, , self )
      If hb_IsNil(vari)
         vari:=""
      ENDIF

      IF !Empty( ::cPicFunc ) .OR. !Empty( ::cPicMask )
         vari := Transform( vari, ::cPicFunc + iif( Empty(::cPicFunc ),"","
" ) + ::cPicMask )
      ELSE
         vari := iif( ::cType == "D", Dtoc( vari ), iif( ::cType ==
"N",Str(vari ),iif(::cType == "C",vari,"" ) ) )
      ENDIF
      ::title := vari
      hwg_Setdlgitemtext( ::oParent:handle, ::id, vari )
   ELSE
      hwg_Setdlgitemtext( ::oParent:handle, ::id, ::title )
   ENDIF

   RETURN Nil

Is because the line below
      vari := Eval( ::bSetGet, , self )
Is returning valtype = U if ::bSetGet not object and get error
Error BASE/1122  Erro nos parâmetros: TRANSFORM
Called from ->TRANSFORM(0)
Called from ->HEDIT:REFRESH(345)
Called from ->HEDIT:INIT(119)

And change all Valtype() by hb_is* increase speed of check hwgui variables.

Best regards,
Itamar M. Lins Jr.