Page 1 of 1

Antonio - Possível Fix para TGET

Posted: Fri Aug 22, 2008 1:26 pm
by 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 :lol:

É possível este cambio em TGET ?

Gracias maestro,

Rossine.

Posted: Fri Aug 22, 2008 2:30 pm
by Antonio Linares
Rossine,

Implementado, gracias! :-)