necesito desactivar una ROW del xbrowse

[goosfancito]

Hola.
Es posible DESACTIVAR una fila del xbrowse?
tengo por ejemplo 10 lineas en un xbrowser y quiero que la primer linea no este habilitada para modificacion.
gracias

[karinha]

Esto?

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=35936&p=214087&hilit=oCol%3AnEditType+%3A&sid=5c3b036d09e3a58796c0669cd8c21552&sid=4a94b3e1bd7cae7706fbc9e08e71ce9e#p214087

Saludos.

[FranciscoA]

Aquí tienes un ejemplo autocontenido que puedes adaptarlo a tus necesidades.

Code: Select all  Expand view

#include "FiveWin.ch"

Function Main()   //RowNoEditable()
local oDlg, oBrw, n
LOCAL aArray := { {1,5,8,4,5,6,7} ,;
                  {2,4,9,4,5,6,0} ,;
                  {3,2,3,4,5,6,0} ,;
                  {4,5,0,4,5,6,7} ,;
                  {5,2,3,4,5,6,7} }

  DEFINE DIALOG oDlg  SIZE 450,300 PIXEL TITLE "LINEAS EDITABLES O NO"
  @5, 10 SAY "Linea 1 no editable" SIZE 200,10 PIXEL OF oDlg

  @ 20, 10 XBROWSE oBrw SIZE -10,-20 PIXEL OF oDlg  DATASOURCE aArray ;
           COLUMNS 1,2,3,4,5,6,7  HEADERS "C1","C2","C3","C4","C5","C6","C7";
           CELL LINES

  oBrw:bChange := { || if(oBrw:nRowSel = 1, oBrw:GoDown(), nil) }
  oBrw:bDragBegin := { |r,c,f,o| nil }
  oBrw:bDropOver  := { |u,r,c,f| nil }

  AEVAL( oBrw:aCols,{|o| o:nWidth := 50 ,;
                         o:nEditType := 1 ,;
                         o:bEditWhen := {|| oBrw:nRowSel > 1 } } )

  oBrw:CreateFromCode()

  ACTIVATE DIALOG oDlg CENTERED ON INIT EVAL(oBrw:bChange)

Return nil
 

[nageswaragunupudi]

Hola.
Es posible DESACTIVAR una fila del xbrowse?
tengo por ejemplo 10 lineas en un xbrowser y quiero que la primer linea no este habilitada para modificacion.
gracias

Code: Select all  Expand view

oBrw:bEditWhens := { || oBrw:KeyNo > 1 }