DCBROWSE vs DCQUICKBROWSE
Posted: Tue Mar 01, 2022 1:56 pm
2 side-by-side examples:
@ 1,1 DCBROWSE oBrowse SIZE 95,18 ID "BROWSE" ;
CURSORMODE XBPBRW_CURSOR_ROW ALIAS "DBCLIF" ;
PRESENTATION { { XBP_PP_COL_HA_FGCLR, GRA_CLR_BLACK },; /// Header FG Color
{ XBP_PP_COL_HA_BGCLR, GRA_CLR_BACKGROUND },; /// Header BG Color
{ XBP_PP_COL_FA_FGCLR, GRA_CLR_YELLOW },; /// Footer FG Color
{ XBP_PP_COL_FA_BGCLR, GRA_CLR_DARKGRAY },; /// Footer BG Color
{ XBP_PP_COL_DA_CELLHEIGHT, 20 }} ; /// Cell Height
NOSIZECOLS
DCBROWSECOL FIELD DBCLIF->FIELD_4 Header "field4" WIDTH 30 PARENT oBrowse OBJECT oColumn
DCBROWSECOL FIELD DBCLIF->FIELD_1 Header "field1" WIDTH 5 PARENT oBrowse
DCBROWSECOL FIELD DBCLIF->FIELD_3 Header "field3" WIDTH 10 PARENT oBrowse
DCBROWSECOL FIELD DBCLIF->FIELD_2 Header "field2" WIDTH 15 PARENT oBrowse
on the right a quickbrowse that for a tenth of a second displays the columns with the same width as the dcbrowse and then narrows:
@ 1,1 DCQUICKBROWSE OBJECT oBrowse SIZE 95,18 ID "BROWSE" ;
CURSORMODE XBPBRW_CURSOR_ROW ALIAS "DBCLIF"
DCBROWSECOL FIELD DBCLIF->FIELD_4 Header "field4" WIDTH 30 PARENT oBrowse OBJECT oColumn
DCBROWSECOL FIELD DBCLIF->FIELD_1 Header "field1" WIDTH 5 PARENT oBrowse
DCBROWSECOL FIELD DBCLIF->FIELD_3 Header "field3" WIDTH 10 PARENT oBrowse
DCBROWSECOL FIELD DBCLIF->FIELD_2 Header "field2" WIDTH 15 PARENT oBrowse
on the left, a correctly displayed dcbrowse:@ 1,1 DCBROWSE oBrowse SIZE 95,18 ID "BROWSE" ;
CURSORMODE XBPBRW_CURSOR_ROW ALIAS "DBCLIF" ;
PRESENTATION { { XBP_PP_COL_HA_FGCLR, GRA_CLR_BLACK },; /// Header FG Color
{ XBP_PP_COL_HA_BGCLR, GRA_CLR_BACKGROUND },; /// Header BG Color
{ XBP_PP_COL_FA_FGCLR, GRA_CLR_YELLOW },; /// Footer FG Color
{ XBP_PP_COL_FA_BGCLR, GRA_CLR_DARKGRAY },; /// Footer BG Color
{ XBP_PP_COL_DA_CELLHEIGHT, 20 }} ; /// Cell Height
NOSIZECOLS
DCBROWSECOL FIELD DBCLIF->FIELD_4 Header "field4" WIDTH 30 PARENT oBrowse OBJECT oColumn
DCBROWSECOL FIELD DBCLIF->FIELD_1 Header "field1" WIDTH 5 PARENT oBrowse
DCBROWSECOL FIELD DBCLIF->FIELD_3 Header "field3" WIDTH 10 PARENT oBrowse
DCBROWSECOL FIELD DBCLIF->FIELD_2 Header "field2" WIDTH 15 PARENT oBrowse
on the right a quickbrowse that for a tenth of a second displays the columns with the same width as the dcbrowse and then narrows:
@ 1,1 DCQUICKBROWSE OBJECT oBrowse SIZE 95,18 ID "BROWSE" ;
CURSORMODE XBPBRW_CURSOR_ROW ALIAS "DBCLIF"
DCBROWSECOL FIELD DBCLIF->FIELD_4 Header "field4" WIDTH 30 PARENT oBrowse OBJECT oColumn
DCBROWSECOL FIELD DBCLIF->FIELD_1 Header "field1" WIDTH 5 PARENT oBrowse
DCBROWSECOL FIELD DBCLIF->FIELD_3 Header "field3" WIDTH 10 PARENT oBrowse
DCBROWSECOL FIELD DBCLIF->FIELD_2 Header "field2" WIDTH 15 PARENT oBrowse