topic-32499

Willi Quintana

Posts: 1054

Joined: Sun Oct 09, 2005 10:41 PM

Bloquear edicion por celdas en xbrowse
Posted: Fri May 27, 2016 01:22 AM

Hola amigos.,
Como puedo bloquear una o varias columnas para evitar la edición por celdas en un xbrowse?,
Salu2

cmsoft

Posts: 1344

Joined: Wed Nov 16, 2005 09:14 PM

Re: Bloquear edicion por celdas en xbrowse
Posted: Fri May 27, 2016 12:30 PM

Hola Willi:
No se si es a esto lo que te refieres, pero si solo le indicas cuales son editables puedes hacerlo asi:

Code (fw): Select all Collapse

REDEFINE XBROWSE oBrw DATASOURCE oQry;
              COLUMNS "ticomp","numcomp","fecha","saldo","pagado","saldonue";
              HEADERS "Tipo","Nro. Compr.","Fecha","Saldo","Pagado","Nuevo Saldo" FOOTERS;
              SIZES 63,165,80,105,95,95 ID 120 OF oDlg 
    oBrw:aCols[4]:nFooterType := AGGR_SUM
    oBrw:aCols[5]:nFooterType := AGGR_SUM
    oBrw:aCols[6]:nFooterType := AGGR_SUM
    oBrw:aCols[5]:lAutoSave := .t.
    oBrw:nMoveType := 4
    oBrw:aCols[5]:nEditType := EDIT_GET    
    oBrw:aCols[5]:bEditValid  := {|oGet, oCol| ControlSaldo(oGet:value,EVAL(oBrw:aCols[4]:bEditValue))} //Control saldo es una funcion que valida el dato ingresado
    oBrw:aCols[5]:bOnPostEdit := {|oCol, xVal, nKey | CambiaSaldo(xval)}   // Cambia saldo me cambia la columna 6 que tiene el nuevo saldo

Espero te sirva

Salu2
Cesar Gomez
https://www.bcnsoft.com.ar
https://www.pedidosbcn.com

Willi Quintana

Posts: 1054

Joined: Sun Oct 09, 2005 10:41 PM

Re: Bloquear edicion por celdas en xbrowse
Posted: Sat May 28, 2016 03:47 AM

Gracias sr.
Salu2

FiveTech Support Forums

Continue the discussion