BUG with GRID This.CellColIndex ?
Posted: Wed Jan 08, 2020 11:59 am
hi,
i got a BUG when using This.CellColIndex in a GRID this Way
this Code is to show in which Column i click in Header but it is Col+1
so 1st Col give me 2 ... only Last is right
can someone confirm this BUG ?
i got a BUG when using This.CellColIndex in a GRID this Way
Code: Select all
PROCEDURE Data2Array(...)
LOCAL aClickHead := {}
bClickHead := { || SetEndCol( aNew, @iMax ) }
FOR j := 1 TO jMax // every Column
AADD( aBackColor, bBackColor )
AADD( aForeColor, bForeColor )
AADD( aClickHead, bClickHead )
NEXT
@ 50, 10 GRID Grid_1 ;
...
DYNAMICBACKCOLOR aBackColor ;
DYNAMICFORECOLOR aForeColor ;
ON HEADCLICK aClickHead
so 1st Col give me 2 ... only Last is right
Code: Select all
STATIC PROCEDURE SetEndCol( aNew, nInOut )
LOCAL nCol := This.CellColIndex
LOCAL iMax := LEN( aNew[1] )
IF nCol <= iMax
nInOut := nCol
MsgInfo( "End Col : " +;
LTRIM( STR( nCol ) ) + " of " + ;
LTRIM( STR( iMax ) ) )
ENDIF
RETURN