FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour btnget con tget
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM
btnget con tget
Posted: Tue Jan 05, 2010 09:57 PM

Con las modificaciones hechas a la clase tget agregando el ACTION , se puede seguir usando btnget con tget?
salu2
paco

____________________

Paco
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: btnget con tget
Posted: Wed Jan 06, 2010 12:15 PM

Hola

No se puede usar ya que al usar la btnget te saldrian además el boton (..)

deberas modificar la clase tget y btnget para compatibilizarlas..

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM
Re: btnget con tget
Posted: Thu Jan 07, 2010 07:16 AM

Patricio,
no son nada bueno retocando clases no les entiendo mucho, pero intentare a ver si me sale
salu2
paco

____________________

Paco
Posts: 1074
Joined: Fri Oct 07, 2005 01:56 PM
Re: btnget con tget
Posted: Thu Jan 07, 2010 01:36 PM
hola

en la clase tGet
Code (fw): Select all Collapse
CLASS TGet FROM TControl
..
..
DATA   lBtnGet INIT .f.
..
..
ENDCLASS


Code (fw): Select all Collapse
METHOD CreateButton() CLASS TGet

   local oThis := Self
..
..
   if ValType( ::bAction ) == "B" .and. Upper( ::ClassName() ) == "TGET" .and. !::lBtnGet

..
..


en la CLASE tBtnGet
Code (fw): Select all Collapse
METHOD New(..

  ..
  ..
  ::lBtnGet   := .t.

return ( Self )


Code (fw): Select all Collapse
METHOD redefine(..

  ..
  ..
  ::lBtnGet   := .t.

return ( Self )
Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM
Re: btnget con tget
Posted: Mon Jan 11, 2010 02:07 PM

Gracias Patricio, hare pruebas
saludos
paco

____________________

Paco
Posts: 845
Joined: Sun Oct 09, 2005 05:36 PM
Re: btnget con tget
Posted: Sat Jan 23, 2010 07:58 PM

Patricio, con los cambios si que funciono
saludos
paco

____________________

Paco
Posts: 1789
Joined: Tue Oct 11, 2005 05:01 PM
Re: btnget con tget
Posted: Sun May 02, 2010 02:48 AM

Gracias por la info, funciono al 100%.

Salu2

Carlos Vargas

Desde Managua, Nicaragua (CA)

Continue the discussion