Hello, is it possible to set color to column header for LISTBOX? I would like to set a color to certain columns that I allow sorting.
Thank you,

Possible colors, look on xBrowse.prg:
bClrHeader,; // default color pair for header
bClrFooter,; // default color pair for footer
bClrStd,; // default color pair for normal rows
bClrSel,; // default color pair for selected row
bClrSelFocus,; // default color pair for selected row when control has focus
bClrEdit // default color pair for edition

Thank You, but got the following error, I am using TWBROWSE

Application

Path and name: C:\Winapps\cargo\port.exe (32 bits)
Size: 1,946,112 bytes
Time from start: 0 hours 0 mins 1 secs
Error occurred at: 03/12/2009, 18:42:45
Error description: Error BASE/1005 Message not found: TWBROWSE:_BCLRHEADER

Stack Calls

Called from: source\rtl\tobject.prg => TWBROWSE:ERROR(172)
Called from: source\rtl\tobject.prg => TWBROWSE:MSGNOTFOUND(205)
Called from: source\rtl\tobject.prg => TWBROWSE:_BCLRHEADER(0)
Called from: port.prg => _PORT(113)

darrell,
i use this, change color and font

 oBGru:bBkColor      := {|nRow,nCol,nStyle| IF( nStyle==0 .and. nCol==2, ;
                                                                      nRGB(255,135,15), ) }

 oBGru:bFont  := {|nRow,nCol,nStyleLine| ;
                                             IF(nStyleLine==1 .AND. nCol==2,oFnt:hFont,) }

regards
Paco

Darrell,

TWBrowse uses these for the header colors:

oLbx:nClrForeHead
oLbx::nClrBackHead

However, you can only color the entire header, not a specific column's header. To color specific headers you will either have to use TCBrowse or TXBrowse.

Regards,
James