FiveTech Software tech support forums

... Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:PAINTBMPANDTEXT( 13879 ) Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:PAINTHEADER( 14044 ) Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:PAINTHEADER( 2825 ) Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:PAINT( ...

... error: +    Args:      [   1] = N   2      [   2] = U   Stack Calls ===========    Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:PAINTHEADER( 14000 )    Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:PAINTHEADER( 2825 )    Called from: .\source\classes\XBROWSE.PRG => ...

... METHOD SetDate( dDate ) CLASS TMonthView ... ::dEnd := ::dStart + 34 ::nWks := 6 <------------------------------ De 5 para 6 ... METHOD PaintHeader( hDC ) CLASS TMonthView //local dFirstDateWeek := ::GetFirstDateWeek( ::dDate ) //::dDate - DoW( ::dDate ) + 1 local dFirstDateWeek := ::dDate ...

Fixed and the fix is available in FWH 17.02. You can implement the fix with the following correction. Please locate these lines in the METHOD PaintHeader(...) CLASS TXBrwColumn    if nCol != nil      if nCol != 0         ::nDisplayCol := nCol  ...

Mr Nages. Gracias por sus sugerencias, su atención, y su codigo. Precisamente estaba tratando de crear la function RefreshHeaders() y/o usar PaintHeader(), pero aún no lo había logrado de ese modo, así que decidí exponer el código por si alguien decidía mejorarlo. Nuevamente, gracias!! ******************* ...

... nFor ] := nCol      oCol := oBrw:ColAtPos( nFor )      nCol += oCol:nWidth + 2   next   aCols[ nFor ] := nCol   oBrw:PaintHeader( oBrw:GetDC(), aCols, nLast, oBrw:hWhitePen, oBrw:hBtnShadowPen, oBrw:hColPen )   oBrw:ReleaseDC()return nil//----------------------------------------------------------------------------//static ...

... contacted me personally by email. But for the benefit of all I like to post the fix. Please make this correction in the xbrowse.prg. In the method PaintHeader( ... ) class TXBrowse, please locate this line of code: present code: if oCol:cGrpHdr != cGrpHdr please change this line as: if .not. ( ...

... += IF( ::oBrw:lSortBmp, ::oBrw:aSortBmp[ 1 ][ BITMAP_WIDTH ], 0 ) + BMP_EXTRAWIDTH // MVG   endif  Finally In METHOD PaintHeader CLASS TXBrwColumn Modify      if ! Empty( ::cOrder ) .AND. ::oBrw:lSortBmp         aBitmap     := ::oBrw:aSortBmp[ If( ::cOrder ...

... modify or AL_RIGHT? nageswaragunupudi escribió: This is not provided even in the current version. You need to change xbrowse.prg or override paintheader() method of TXBrwColumn Asi se ve el ejemplo con FW13.08 (XBrowse original) So you see the example FW13.08 (Original xBrowse) http://img844.imageshack.us/img844/4571/fevw.png ...

... modify or AL_RIGHT? nageswaragunupudi escribió: This is not provided even in the current version. You need to change xbrowse.prg or override paintheader() method of TXBrwColumn Asi se ve el ejemplo con FW13.08 (XBrowse original) So you see the example FW13.08 (Original xBrowse) http://img844.imageshack.us/img844/4571/fevw.png ...

... how to come out AL_LEFT modify or AL_RIGHT? This is not provided even in the current version. You need to change xbrowse.prg or override paintheader() method of TXBrwColumn Si, ya lo tengo implementado Yes, I have already implemented - Like I can paint text in the cell that I have the ...

... how to come out AL_LEFT modify or AL_RIGHT? This is not provided even in the current version. You need to change xbrowse.prg or override paintheader() method of TXBrwColumn - Like I can paint text in the cell that I have the bitmap? Yes. I shall answer this separately - How to know if ...

... metodo KeyDown para que salte las celdas y columnas vacias, programado con una data lNoEmpty cuando te mueves con el teclado - Modificar el metodo PaintHeader de columnas para que pinte los titulos de grupos mas cerca del area de datos cuando no hay titulos de columnas. Usted puede adaptar facilmente ...

JLL, La DATA bClrHeader debe retornar un array de 3 elementos y el tercer valor es para pintar las líneas horizontales de la cabecera. En el Método PaintHeader() está lo siguiente: aColors := Eval( ::bClrHeader ) y más abajo: hHeaderPen := CreatePen( PS_SOLID, 1, aColors[ Min( 3, Len( aColors ) ...

Estoy intentando cambiar el color del texto del header de un browse al estar clickado .
Se puede asignar cambiando el metodo PaintHeader de las columnas pero lo deseable seria que la data ::bClrHeader pudiera admitir un parametro linvert como se hace con ::bClrGrad .
saludos.