Antonio - Possível Fix para TGET

[Rossine]

Olá Antonio,

Eu uso a classe TBTNGET e ela está em conflito com a nova versão de TGET usando bAction. O que fiz para TGET trabalhar junto com TBTNGET foi isto:

Code: Select all

...
METHOD CreateButton() CLASS TGet

   local oThis := Self
   
   if ValType( ::bAction ) == "B" .and. ::classname() == "TGET"  // New
...

... com isto tudo voltou ao normal

É possível este cambio em TGET ?

Gracias maestro,

Rossine.

[Antonio Linares]

Rossine,

Implementado, gracias!