FiveTech Software tech support forums

Estimados Lo de bEditBlock lo solucioné pasando la base a un Array, sólo me falta condicionar las columnas. Gracias Saludos... ya probastes :bEditWhen := {|| !EMPTY( aItems[oBrw:nArrayAt, 2] ) }, gracias... :shock:    WITH OBJECT ...

Estimados

Lo de bEditBlock lo solucioné pasando la base a un Array,

sólo me falta condicionar las columnas.

Gracias

... {|o, v, n| Nuevo->haber:=v }      oCol:nFooterType := AGGR_SUM   Aparte rengo un problema también en xBrowse Con bEditBlock Habilitando la pulsación de una tecla en éste caso F2     oCol:=oBrw1:AddCol()      oCol:cEditPicture   ...

... OBJECT oBrw:aCols[ 2 ]      :nEditType     := EDIT_BUTTON      :AddResource( "OPEN" )      :nBtnBmp       := 1      :bEditBlock    := { || test()}      :beditwhen    := { || oBrw:keyno <> 1 }   END   oBrw:CreateFromCode()  ...

I tried also with

:nEditType := EDIT_BUTTON
:bEditBlock := { |o|Msginfo("") }
:bEditWhen := { || oBrw:nArrayAt<>1 }

I wish when on first line of the browse thefinal user cannot edit the cell

the user can edit only from second line

... :nBtnBmp := 1 :nwidth := 60 :nDataStrAlign := AL_CENTER :nHeadStrAlign := AL_CENTER :nEditType := EDIT_BUTTON :bEditBlock := { ||RES->QUANTITY++ } :lBtnTransparent := .t. :bEditWhen := { || oBrw:BookMark == 1 } END not run it add the quantity also the record ...

Your changes are correct. It should work. Anyway please try this new function XBrDatePicker( oBrw:oCol ) Usage: oCol:bEditBlock := { |r,c,o,k| XbrDatePick( o ) } #include "fivewin.ch"static dDate, dBOM, dOffSetstatic nMonth, cMonth, nYearstatic oBrw, oDate//----------------------------------------------------------------------------//function ...

... := {| oCol, xVal, nKey | IIf( nKey == VK_RETURN,(aParcelasModalidade[oBrowse:nArrayAt,3] := xVal, oBrowse:Refresh()),) } oBrowse:aCols[2]:bEditBlock := {|r,c| IIf(!Empty(aParcelasModalidade[oBrowse:nArrayAt,1]), aParcelasModalidade[oBrowse:nArrayAt,3] := Calend(aParcelasModalidade[oBrowse:nArrayAt,3], ...

... := 16 oBrwcp:aCols[10]:nBtnWidth := 12 oBrwcp:aCols[10]:nEditType := EDIT_GET_BUTTON oBrwcp:aCols[10]:bStrData := {|| ''} oBrwcp:aCols[10]:bEditBlock := {|| Produto_Bonificar_Menos( oBrwcp, aHistoricoComprasProdutos ), NIL} oBrwcp:aCols[10]:bEditWhen := {|| .f. } oBrwcp:AddCol() oBrwcp:aCols[11]:nDataStrAlign ...

... := AL_CENTER oBrwb:aCols[1 ]:cHeader := 'Venda' oBrwb:aCols[1 ]:cBtnCaption := '$' oBrwb:aCols[1 ]:nEditType := EDIT_GET_BUTTON oBrwb:aCols[1 ]:bEditBlock := {|| oBrwb:SelectCol(1), NIL } //ISSO NÃO FUNCIONA :cry: oBrwb:aCols[1 ]:oBtnList:cToolTip := 'Teste'

Found it

oCol:bOnChange := { |oCol, uOldVal| OnColChange( oCol, uOldVal ) }

Hello, Witch block is best to use for folowing purpose : In a online system (Mariadb) oRs ....... I want to save the changes to a change log whenever a user changes a field. My coaches can change ex. the adres of a member, but I want to log that change : So I want to store in 'changes" ex. Coac...

ideia..poderia criar um botao centralizado na coluna.. ex: oCol := oLbxPefa:aCols[ 5 ] oCol:nEditType := EDIT_BUTTON oCol:bEditBlock := {|| CriaPdfDanfe() } oCol:AddResource("BMP_PRNT") oCol:nBtnBmp := 1 oCol:nDataBmpAlign := 1 // 2 acho que seja centralizado

For this you can use oCol:bEditBlock.
When the button is clicked, this codeblock is evaluated with { |nrow,ncol,ocol,nkey| ...... }
You incorporate your popmenu display code inside this codeblock.

bEditBlock This codeblock should return the new value to be assigned if the column value is to be changed or should return NIL if no change is to be made. The codeblock may not directly modify the column value Este codeblock ...