Antonio - Possível Fix para TGET

Antonio - Possível Fix para TGET

Postby Rossine » Fri Aug 22, 2008 1:26 pm

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  Expand view  RUN
...
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.
Obrigado, Regards, Saludos

Rossine.

Harbour and Harbour++
Rossine
 
Posts: 344
Joined: Tue Oct 11, 2005 11:33 am

Postby Antonio Linares » Fri Aug 22, 2008 2:30 pm

Rossine,

Implementado, gracias! :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42161
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Antonio Linares and 59 guests