[Hwgui-developers] Bug in hEdit()

[Rodrigo M. <rod...@te...>]

Hi,

I think there is a logic question that generate this bug:

Error BASE/1072  Argument error: <>
Called from hedit.prg->HEDIT:REFRESH(157)
Called from hedit.prg->__WHEN(549)
Called from hedit.prg->(b)HEDIT:NEW(77)
Called from hdialog.prg->DLGCOMMAND(303)
Called from hdialog.prg->(b)(_INITSTATICS)(0)
Called from hdialog.prg->DEFMODALDLGPROC(207)
Called from ->SETFOCUS(0)
Called from hedit.prg->GETSKIP(761)
Called from hdialog.prg->DLGCOMMAND(288)
Called from hdialog.prg->(b)(_INITSTATICS)(0)
Called from hdialog.prg->DEFMODALDLGPROC(207)
Called from ->HWG_DLGBOXINDIRECT(0)
Called from hdialog.prg->HDIALOG:ACTIVATE(144)
Called from edit.prg->TEST1(132)
Called from edit.prg->(b)TEST(42)
Called from hdialog.prg->DLGCOMMAND(303)
Called from hdialog.prg->(b)(_INITSTATICS)(0)
Called from hdialog.prg->DEFMODALDLGPROC(207)
Called from ->HWG_DLGBOXINDIRECT(0)
Called from hdialog.prg->HDIALOG:ACTIVATE(144)
Called from edit.prg->TEST(45)
Called from edit.prg->(b)MAIN(14)
Called from hwindow.prg->DEFWNDPROC(277)
Called from ->HWG_ACTIVATEMAINWINDOW(0)
Called from hwindow.prg->HWINDOW:ACTIVATE(189)
Called from edit.prg->MAIN(17)

If we look at line 157:

   IF ::bSetGet != Nil
      vari := Eval( ::bSetGet,,self )
      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
      IF vari != ::title        <--------------------- Here line 157
         ::title := vari
      ENDIF
      SetDlgItemText( ::oParent:handle,::id,vari )
   ELSE
      SetDlgItemText( ::oParent:handle,::id,::title )
   ENDIF

But the ::title is not defined, because in line 49, its only defined if
bSetGet is null:

   IF bSetGet == Nil
      ::title := vari
   ENDIF

Regards
Rodrigo