Hola amigos
Tenía necesidad de cambiar el pequeño bmp que aparece por defecto en el header de las columnas indexadas del xBrowse
Hice esta pequeña funcion que quiza a alguien le pueda servir, aqui se las dejo
/*
PARAMETROS: n = 0 (por defecto) pone el bmp por defecto en FWH si no bmp seleccionado de resources
xBrw = el xBrowse sobre el que se aplica el cambio
cBmpAsc y cBmpDes los bitmaps a aplicar al Sort Ascendente y Descendente
*/
//................................................................
FUNCTION CambiaBmpSort(n,xBrw,cBmpAsc,cBmpDes)
local hBmp
DEFAULT n:=0
xBrw:aSortBmp := {}
hBmp := if( n = 0, FWbmpAsc(),LoadBitMap(GetResources(), cBmpAsc ) )
AAdd( xBrw:aSortBmp, { hBmp, 0, nBmpWidth( hBmp ), nBmpHeight( hBmp ), nil, .F. } )
hBmp := if( n = 0, FWbmpDes(),LoadBitMap(GetResources(), cBmpDes ) )
AAdd( xBrw:aSortBmp, { hBmp, 0, nBmpWidth( hBmp ), nBmpHeight( hBmp ), nil, .F. } )
RETU .T.
Es conveniente usar bitmaps de 16 x 16 pixels
Saludos a todos
↧