Progress - handle y widget-handle

tengo entendido que el handle es el apuntador de progres.Pero yo solo apunta a la direccion de memoria.podrian ayudarma para obtener el contenido?

lo que hago es lo sig.

def var whandle as widget-handle extent 5.
def var car as char extent 3 ["s","a","l"].
fill-in="a"

whandle [1]= (fill-in:handle)

quiero comparar el contenido de whandle con car. He probado con

if whandle[1]= widget-handle(car[2]) then do:
/* */
end.
cuando lo compilo no marca error pero cuando lo corro dice
cacarter no valido en la entrada numeriaca h

si alguien puede ayudarme se lo agradeceria

Al obtener el widget-handle de un objeto, este hereda las propiedades y caracteristicas propias del objeto, por ejemplo:
whandle [1]= (fill-in:handle) .
Aquí whandle[1], se puede utilizar la propiedad screen-value para obtener su valor.
así tendrias whandle[1]:screen-value = car[2] para que puedas hacer la comparación.

La función widget-handle te dá el handle del objeto cuyo nombre le proporiones, esto lo asignas a una variable tipo widget-handle y con esto, podrás obtener todas las propiedades y atributos con la sintaxis: objeto:atributo.
Así quedaría tu código:

def var whandle as widget-handle extent 5.
def var car as char extent 3 INITIAL ["s","a","l"].
/** Esto suponiendo un fillin en tu ventana llamado fill-in**/
fill-in:SCREEN-VALUE ="a".
whandle [1]= (fill-in:handle).
/*quiero comparar el contenido de whandle con car. He probado con*/
if whandle[1]:SCREEN-VALUE = car[2] then
MESSAGE "iguales"
VIEW-AS ALERT-BOX INFO BUTTONS OK.
ELSE
MESSAGE "diferentes"
VIEW-AS ALERT-BOX INFO BUTTONS OK.