FiveTech Software tech support forums

... oBrw:aCols[3]:aEditListTxt := {"EFECTIVO", "TARJETA"} oCol:bOnPostEdit:= { |o,x,n| If( n != VK_ESCAPE, oBrw:aRow[o:nArrayCol] := x, ) } Elseif n == 4 oCol:nEditType := EDIT_GET oCol:bOnPostEdit:= { |o,x,n| If( n != VK_ESCAPE, oBrw:aRow[o:nArrayCol] := x, ) } Endif ...

... } oCol := oBrw:AddCol() oCol:AddResource("CHECKON") oCol:AddResource("CHECKOFF") oCol:cHeader := "" oCol:nArrayCol := 1 oCol:nWidth := 20 oCol:bStrData := nil oCol := oBrw:AddCol() oCol:cHeader := "Nº BOLETO" oCol:nArrayCol := 2 oCol:nWidth := ...

... := .f. oCol:lBmpTransparent := .t. oCol:nHeadStrAlign := oCol:nDataBmpAlign := AL_CENTER oCol:cHeader := "" oCol:nWidth := 18 oCol:nArrayCol := 1

Hello Silvio Local R:=oBRW:nArrayAt // rigo array Local Z:=oBRW:nCOLSEL // colonna selezionata Local oCOL:=oBRW:aCols[Z] // txcolonna Local C:=oCOL:nArrayCol // indice colonna array - come ARR_X[R][H] Local nDATO:=oCOL:Value() // dato dentro la cella Local nDATO:=ARR_X[R][C] Best Regards Santo

... := AL_CENTER oCol:nDataStrAlign := AL_LEFT oCol:bOnPostEdit := {|o,x| aProductos[ oBrw:nArrayAt, 1 ] := x } oCol:nEditType := EDIT_GET oCol:nArrayCol := 1

... hilo al que te mande Horacio http://forums.fivetechsupport.com/viewtopic.php?p=70102#p70102 puedes usar esto... oBrw:SelectedCol():nArrayCol o oBrw:SelectedCol():nCreationOrder pero si haces un swap de columnas no te va a servir, es decir intercambias la columna 4 con la 5, aunque ...

... size parameters are ignored. (c) ArrTranspose() function enhanced. (d) Now SeekOnArray() works on cSortOrder column if it is different from the nArraycol. This is the expected behavior. (e) COLUMNS clause in XBROWSE command now accepts multi-dimentional array with column specifications. Each ...

... local bOrder # endif aCols := ::oBrw:aCols cOrder := ::cOrder nLen := Len( aCols ) nAt := If( ValType( ::cSortOrder ) == 'N', ::cSortOrder, ::nArrayCol ) if Len( ::oBrw:aArrayData ) > 0 cType := ValType( ::oBrw:aArrayData[ 1 ] ) if cType == 'A' if ValType( nAt ) == 'N' .and. nAt > 0 ...

... oBrw:bClrSel := {|| { Frente, Fundo } } oBrw:bClrSelFocus := {|| { Frente, Fundo } } oCol := oBrw:AddCol() oCol:cHeader := "CLI" oCol:nArrayCol := 1 oCol:nWidth := 30 oCol := oBrw:AddCol() oCol:cHeader := "Nº NOTA" oCol:nArrayCol := 2 oCol:nWidth := 80 My Add line: AADD( ...

fraxzi wrote:Dear RAO,

but if other type i want to put my own image.. how to determine if column type is other than image?

oCol:bEditValue := { || If( IsBinaryData( oBrw:aRow[ oCol:nArrayCol ] ) .and. FITypeFromMemory( oBrw:aRow[oCol:nArrayCol] <= 0, <cOurImage>, oBrw:aRow[oCol:nArrayCol] ) }

... 13 STEP 2 IF ! EMPTY( aCatalog[nForm, i] ) && Agrega columnas al xBrowse WITH OBJECT ( oCol := :AddCol() ) :cHeader := aCatalog[nForm, i] :nArrayCol := aCatalog[nForm, i + 1] // :cPicture := aCatalog[nEl, 33 + ii] // Picture :nWidth := aCatalog[nForm, 28 + ii] :nHeadStrAlign := AL_CENTER ...

... time(), nValor } ) dFecha += 10 nValores+=nValor nValor ++ EndDo oBrw:SetArray(aMiArray) AEval( oBrw:aCols, {|oCol| oCol:cHeader := aTitCols[oCol:nArrayCol] ,; oCol:bFooter := aFootCols[oCol:nArrayCol] ,; oCol:nWidth:= aWidthCols[oCol:nArrayCol] ,; oCol:cEditPicture:= aPictCols[oCol:nArrayCol] ...

Francisco...

Falta el recurso para construir el ejemplo...

Pero prueba agreando esto a cada definicion de columna

oCol:nArrayCol := 1
oCol:nArrayCol := 2

y haces como te lo indica pablo

... Lailton if you want the real column position dont use obrw:selectedcol(), this return column number from visual column try with oBrw:SelectedCol():nArrayCol or oBrw:SelectedCol():nCreationOrder test oCol:bOnPostEdit := {|o, v, n| msginfo(oBrw:SelectedCol():nArrayCol)} or oCol:bOnPostEdit := {|o, ...

puedes usar esto...

oBrw:SelectedCol():nArrayCol
o
oBrw:SelectedCol():nCreationOrder

pero si haces un swap de columnas no te va a servir, es decir intercambias la columna 4 con la 5, aunque este primero ahora la 5 que la 4 seguiran siendo 5 y 4, espero hacerme entender