Ricardo:
    lo probe y anda de 10 salvo que en lugar de
    grdClientes.Column1.MiText1.enabled=.T.
    lo cambie por
    grdClientes.Column1.MiText1.visible=.T.
    ya que si no lo pongo me queda por defecto en .f. y me anula todos los 
envetos de MiText1

Gracias Ricardo!!
  ----- Original Message ----- 
  From: Ricardo Pina 
  To: GUFA List Member 
  Sent: Thursday, May 06, 2010 10:08 AM
  Subject: [GUFA] Modificar clase base por defecto Grid.column.text



  Hola Pablo

  Una manera de lograr lo que decis teniendo ya definida mediante DEFINE CLASS 
tu subclase TxtBoxGrid.
  Cuando estas seteando las propiedades de tu Grilla personalizada lea agregas 
tu nuevo Textbox.

  grdClientes.Column1.AddObject('MiText1','TxtBoxGrid')
  grdClientes.Column1.CurrentControl ='MiText1'

  y ahi ya lo tienes, pudiendo cambiarle los atributos como el Text1 que viene 
con la grilla

  grdClientes.Column1.MiText1.enabled=.T.
  ...

  Siguiendo la misma idea le podes poner cualquier otro control a la columna.
  Espero te sirva.
  Saludos




   
  El 5 de mayo de 2010 21:00, Pablo Flores <[email protected]> escribió:

    Hola a todos...
        tengo la siguiente inquietud. Tengo  una clase base  grdBase y tambien 
una txtBoxGrid, la cual quisiera que cuando defino la cantidad de columnas en 
grdBase (en tiempo de desarrollo o ejecucion) me tome por defecto el TxtBoxGrid.
    ejemplo: grdCliente as GrdBase
        teniendo grdClientes.columncount=0 
        y coloco grdClientes.columncount=1 (pone por defecto el 
grdClientes.column1.text1.class="TextBox")
        yo quisiera que cuando agrego una o mas columnas, me queden asi:
         grdClientes.columncount=1 (tenga por defecto el 
grdClientes.column1.text1.class="TextBoxGrid")
    Espero me puedan ayudar
    Gracias
    Pablo Flores



  -- 
  Ricardo Pina 
  D&SIP
  Desarrollo y Servicios Informáticos Profesionales
  www.dsip.com.ar 

Responder a