I use my bitmaps for sort the columns
How I can erase the bmp default sort of xbrowse ?
#include "fivewin.ch"
function Main()
local oDlg, oBrw
USE STATES
SET ORDER TO TAG CODE
GO TOP
DEFINE DIALOG oDlg SIZE 360,300 PIXEL TRUEPIXEL
@ 20,20 XBROWSE oBrw SIZE -20,-20 PIXEL OF oDlg ;
DATASOURCE "STATES" AUTOCOLS AUTOSORT CELL LINES NOBORDER
WITH OBJECT oBrw
:AddBitmap( { "c:\fwh\bitmaps\16x16\up2.bmp", "c:\fwh\bitmaps\16x16\down2.bmp" } )
:CreateFromCode()
END
ACTIVATE DIALOG oDlg CENTERED ;
ON INIT ( DeleteObject( oBrw:aSortBmp[ 1, 1 ] ), ;
DeleteObject( oBrw:aSortBmp[ 2, 1 ] ), ;
oBrw:aSortBmp := oBrw:aBitmaps, ;
oBrw:aBitmaps := {} )
return nil
oBrw:SetSortBmp( image1, image2, [image3] )
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Rick Lipkin and 58 guests