Xbrowse Problem Bitmap autosort

[Silvio.Falconi]

I use my bitmaps for sort the columns

How I can erase the bmp default sort of xbrowse ?

[Silvio.Falconi]

I tried also with Lautosort:=.f.

any solution please ?

[nageswaragunupudi]

Code: Select all  Expand view

#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
 

In FWH 1808, we can call

Code: Select all  Expand view

oBrw:SetSortBmp( image1, image2, [image3] )
 

[Silvio.Falconi]

Sorry MrRao ,
here also not run ok

I have
WITH OBJECT oApp():oGrid
WITH OBJECT oApp():oGrid:aCols[1]
:AddResource("SORT_1_16")
:AddResource("SORT_2_16")
:nHeadBmpNo := 1
:nHeadBmpAlign := AL_RIGHT
:bLClickHeader :={ ||(CuSel_Index(1,"CU"), CU->(DbSetOrder(1),nOrder:=1) ) }
END
END



IF I insert :AddBitmap( { "c:\work\fwh\bitmaps\16x16\up2.bmp", "c:\work\fwh\bitmaps\16x16\down2.bmp" } )

and then
ACTIVATE DIALOG....
ON INIT ( DeleteObject( oApp():oGrid:aSortBmp[ 1, 1 ] ), ;
DeleteObject( oApp():oGrid:aSortBmp[ 2, 1 ] ), ;
oApp():oGrid:aSortBmp := oApp():oGrid:aBitmaps, ;
oApp():oGrid:aBitmaps := {},;
....

I have this error






Now I resolve change
:AddBitmap( { "c:\work\fwh\bitmaps\16x16\up2.bmp", "c:\work\fwh\bitmaps\16x16\down2.bmp" } )

with

:AddBitmap( {, } )