DCBROWSE row cursor hilite foreground color express++ 258
Posted: Tue Jan 29, 2013 11:01 am
The below sample program does not show the default DC_BrowPres() row hilite color of white/blue correctly. The white foreground color is not showing. Is there a workaround?
Code: Select all
#INCLUDE "dcdialog.CH"
#INCLUDE "GRA.CH"
PROCEDURE Main()
LOCAL aBrowPres, GetList[0], oBrowse, aDir
aDir := Directory()
aBrowPres := DC_BrowPres()
@ 0,0 DCBROWSE oBrowse DATA aDir SIZE 20,20 FIT ;
PRESENTATION aBrowPres ;
COLOR {|| { GRA_CLR_BLUE,GRA_CLR_WHITE } }
DCBROWSECOL ELEMENT 1 HEADER 'File Name' PARENT oBrowse WIDTH 10
DCBROWSECOL ELEMENT 2 HEADER 'File Date' PARENT oBrowse WIDTH 10
DCREAD GUI FIT TITLE 'Presentation Test'
RETURN
PROC appsys ; return