bug en TGet; METHOD CreateButton(

[mgsoft]

Antonio,

En dicho método, al principio indica:

if ValType( ::bAction ) == "B" .and. Upper( ::ClassName() ) == "TGET"

Sin embargo, debería ser Upper( ::Super:ClassName() ), porque si hacemos una clase derivada de TGET entonces no funciona.

Muchas gracias Master.