FiveTech Software tech support forums

... {nRow, 0, nRow + nHeight, nBrwWidth}, ::hBrushRecSel ) // hBrush ) DeleteObject( hBrush ) for nFor := 1 to nLast nCol := aCols[ nFor ] oCol := ::ColAtPos( nFor ) IF !::lFooterColDivider //FranciscoA Ene/01/2009 //Pintar o no divisores de cols en el footer if nFor == 1 nCol := aCols[ nFor ] oCol ...

Hi,
Sometimes, when current col at the left one of the rightmost, press right arrow key, the browse repaints ,gets run time error :

array bound error

call from METHOD ColAtPos( nPos )
call from paint() methd oCol := ::ColAtPos( nFor )

Regards !
Shuming Wang

... circumstances oBrw:nAt() and oBrw:nColSel give different values? Method nAt returns ::ColPos( ::SelectedCol() ) Method SelectedCol() returns ::ColAtPos( ::nColSel ) and in turn ColAtPos( ::nColSel ) returns ::aDisplay[ ::nColSel ] Therefore SelectedCol() returns ::aDisplay[ ::nColSel ] Method ...

... 2 ] ) FillRect( hDC, {nRow, 2, nRow + nHeight, nBrwWidth}, hBrush ) DeleteObject( hBrush ) for nFor := 1 to nLast nCol := aCols[ nFor ] oCol := ::ColAtPos( nFor ) oCol:PaintHeader( nRow, nCol, nHeight ) next // paint space right col header, 2007 look nTop = 0 nBottom = nTop + nHeight nLeft := ...

... de scroll son mostradas automáticamente y permite restaurar la posición de las ventanas hijas. * Corrección: En la clase TXBrowse, el método ColAtPos() a veces daba error. Ahora está correcto. * Mejora: En la clase TComboBox, el estilo CBS_DROPDOWN permite saltar al siguiente control, mediante ...

... moved out of the main area, the scrollbars are automatically shown and allow to restore the child windows position. * Fix: Class TXBrowse Method ColAtPos() was giving out of bound errors sometimes. Now it is ok. * Enhancement: Class TComboBox Style CBS_DROPDOWN allows Tab and Return to skip to ...

Hello, I have a button with as action : ATAIL(oBrw:aCols):Hide() , Prnt(oBrw ) , ATAIL(oBrw:aCols):Show() This give a error in : METHOD ColAtPos( nPos ) INLINE ::aCols[ ::aDisplay[ nPos ] ] LEN(::aDisplay) < LEN(::aCols) while npos == LEN(::aCols) Maybe is better : # xtranslate MinMax(<xValue> ...

Pedro,

Modifica este método en la Clase TXBrowse:

METHOD ColAtPos( nPos ) INLINE ::aCols[ ::aDisplay[ Min( nPos, Len( ::aDisplay ) ) ] ]

No es que sea la solución perfecta, pero funciona

... al Stack ________________________________________________________________________________ Called from (b)TXBROWSE(336) Called from TXBROWSE:COLATPOS(0) Called from TXBROWSE:GORIGHT(1588) Called from TXBROWSE:KEYDOWN(1380) Called from TWINDOW:HANDLEEVENT(0) Called from TXBROWSE:HANDLEEVENT(1360) ...

Marco,

Try this:

oBrw:ColAtPos( oBrw:nColSel ):nCreationOrder