I need some help with TGet class. A few month ago I start to upgrade my software from version FWH11.08 to 20.07 and saw differences in TGet functionality. In old version I get variable name with "oget1:oGet:Name" but in new FWH same code return name of get object. How to retrieve variable name from get in FWH20.07 version? Here is small example ...
Code: Select all
#include "fivewin.ch"
//--------------------------------------------------
Function main()
local oGet1,oGet2
local cVar1,cVar2
cVar1:=" "
cVar2:=" "
DEFINE DIALOG oDlg FROM 0,0 TO 40,80
@ 1.20, 08.0 get oGet1 var cVar1 update SIZE 25,10 VALID (msginfo(oget1:oGet:Name),.t.) // old FWH11.08 return good value "cVar1" but FWH20.07 return "oGet1"
@ 2.20, 08.0 get oGet2 var cVar2 update SIZE 25,10 VALID (msginfo(oget2:oGet:Name),.t.)
ACTIVATE DIALOG oDlg
return