FiveTech Software tech support forums

What is this? :aCols[1]:bEditBlock := { |r,c|IIF(oBrwFilter:nArrayAt = 1,MsgInfo("not"),) } What is the purpose of bEditBlock? I not Know I found this line on this forum on first colum I use :aCols[1]:nEditType ...

What is this?

Code: Select all  Expand view

:aCols[1]:bEditBlock := { |r,c|IIF(oBrwFilter:nArrayAt = 1,MsgInfo("not"),) }

What is the purpose of bEditBlock?

... 4 ]:nMaxLen := n Nages, on first column I made :aCols[1]:nEditType := EDIT_LISTBOX :aCols[1]:aEditListTxt := acOperators :aCols[1]:bEditBlock := { |r,c|IIF(oBrwFilter:nArrayAt = 1,MsgInfo("not"),) } I not want the end use can select the combobox if is on first line ( SEE ...

...     :CreateFromCode()   END for the first column I wish it not show the listbox when is the first line of array this not run :aCols[1]:bEditBlock := { |r,c,oCol|IIF(!oBrwFilter:nArrayAt = 1, MsgInfo("Non puoi")) } for the 4th column I have problem because I cannot insert more ...

... { |o,nval| hola(@acDescriptor,@acTemporal,olbx101c,nval) } olbx101c:acols[4]:aEditListTxt := acTemporal //olbx101c:acols[4]:bEditBlock:= { mifuncion('1') } //olbx101c:acols[4]:bBmpAction := { |oCol| mifuncion('2') } //olbx101c:acols[4]:bEditValid :={|| mifuncion('2') } olbx101c:acols[4]:bEditWhen:= ...

Please make sure that bEditBlock returns nil
That means, MiFunction() should return nil.

Explanation:
If bEditBlock returns nil, xbrowse does not take any further action.
But if bEditBlock returns any value other than nil, XBrowse assigns that value to the field.

Gracias por la rápida respuesta Cristobal.

He probado tu código y el comportamiento es el mismo, cuando pulsas doble click en el botón de "menos" hace las 2 acciones, primero evalúa el bEditBlock y luego el bBmpAction

... OBRW1:REFRESH() } oBRW1:lColChangeNotify := .T. oBrw1:aCols[ 2 ]:nEdittype := IIf(obrw1:narrayat==1,EDIT_GET,EDIT_BUTTON) oBrw1:aCols[ 2 ]:bEditBlock := { || MsgYesNo( "Please select" ) } oBrw2:aCols[ 2 ]:nEdittype := EDIT_GET ACTIVATE DIALOG oDlg CENTERED return nil

... := { |r,c,f,o| FooterAggrClick( r, c, f, o ) } oBrw:aCols[ 3 ]:cEditPicture := "99" oBrw:aCols[ 3 ]:nEditType := EDIT_GET oBrw:bEditBlock := {|| W_253G( W_253->(RecNo()),3) } Problem is when the user modifies the column [3] [Days] data, the other fields [A1/A5/Gross] same ...

... y/o Ing. Cristobal Navarro. :aCols[3]:nEdittype := EDIT_BUTTON :aCols[3]:AddResource( "ISR_IVA" ) // tu ícono p/el boton :aCols[3]:bEditBlock := {|| MsgInfo("ISR_IVA") } // llama a una funcion que abre un Dlg y muestra el Detalle // Aqui otro boton en la misma celda o ...

... y/o Ing. Cristobal Navarro. :aCols[3]:nEdittype := EDIT_BUTTON :aCols[3]:AddResource( "ISR_IVA" ) // tu ícono p/el boton :aCols[3]:bEditBlock := {|| MsgInfo("ISR_IVA") } // llama a una funcion que abre un Dlg y muestra el Detalle // Aqui otro boton en la misma celda o ...

... oCol:cHeader := "货币" oCol:bEditValue:= {||odb2:currency} ocol:nedittype:= {||if(::ledit.and.!odb2:EOF(),EDIT_GET_BUTTON,0)} oCol:bEditBlock := {||currencybrw(odb2:currency)} oCol:bOnPostEdit := {|o, v, n| if( n != VK_ESCAPE .and. v != odb2:currency,(v:=currencybrw(v,.t.),odb2:currency:=v,odb2:SAVE()) ...

... 120 :nDataStrAlign := AL_CENTER :nHeadStrAlign := AL_CENTER :nDataStrAlign := oBrowse:aCols[ 7]:DefStyle(AL_LEFT,.f.) :nEditType := EDIT_BUTTON :bEditBlock := { |r,c,o,k|(XbrGetDate( o,"Seleziona una data",,1 ),oBrowse:refresh()) } END But it make error , how I can resolve please ?

... c_Path1 + "Plus.png" ) :aCols[ 6 ]:lBtnTransparent := .t. :aCols[ 6 ]:nBtnBmp := 1 :aCols[ 6 ]:nEditType := EDIT_BUTTON :aCols[ 6 ]:bEditBlock := { | nRow, nCol, oCol, nKey | ; MsgAlert( "Row : = " + ALLTRIM( STR( oBrw:Keyno() ) ) + CRLF + ; "Col : = " + ALLTRIM( ...