bb.donnay-software.com

Donnay Software Web Forums
It is currently Tue Aug 04, 2020 1:45 am

All times are UTC - 7 hours




Post new topic Reply to topic  [ 4 posts ] 
Author Message
PostPosted: Mon Jan 13, 2020 12:20 pm 
Offline
User avatar

Joined: Tue Feb 09, 2010 3:06 am
Posts: 137
Hi Roger,

This run ok on Build 264 :

Code:
FUNCTION Teste_CheckBrowse()
LOCAL GetList[0], oBrowse, aDir, n := 1, GetOptions, aBrowPres

aBrowPres := ;
    { { XBP_PP_COL_HA_FGCLR, GRA_CLR_WHITE },            ;
      { XBP_PP_COL_HA_BGCLR, GRA_CLR_DARKGRAY },         ;
      { XBP_PP_COL_DA_ROWSEPARATOR, XBPCOL_SEP_DOTTED }, ;
      { XBP_PP_COL_DA_COLSEPARATOR, XBPCOL_SEP_DOTTED }, ;
      { XBP_PP_COL_DA_FGCLR, GRA_CLR_BLACK },            ;
      { XBP_PP_COL_DA_BGCLR, GRA_CLR_WHITE },            ;
      { XBP_PP_COL_DA_ROWHEIGHT, 18 },                   ;
      { XBP_PP_COL_HA_HEIGHT, 20 },                      ;
      { XBP_PP_COL_DA_HILITE_FGCLR, GRA_CLR_WHITE },     ;
      { XBP_PP_COL_DA_HILITE_BGCLR, GRA_CLR_BLUE },      ;
      { XBP_PP_COL_FA_FGCLR, GRA_CLR_WHITE },            ;
      { XBP_PP_COL_FA_BGCLR, GRA_CLR_DARKGRAY },         ;
      { XBP_PP_COL_FA_HEIGHT, 10 } }

aDir := Directory()
FOR n := 1 TO Len(aDir)
  AAdd(aDir[n],.f.)
NEXT

n := 1

@ 0,0 DCBROWSE oBrowse DATA aDir SIZE 80,12 ;
      PRESENTATION aBrowPres FIT ;
      POINTER n ;
      MARK 11 ;
      MKCOLOR 11  , 0, GRA_CLR_BLUE

DCBROWSECOL DATA {|x|x:=DC_GetColArray(11,oBrowse), ;
         IIF(x,BITMAP_CHECKBOX_CHECKED_S,BITMAP_CHECKBOX_UNCHECKED_S)} ;
      PARENT oBrowse HEADER 'Sel 1' WIDTH 3 ;
      TYPE XBPCOL_TYPE_BITMAP ;
      EVAL {|oB|oB:dataArea:lbClick := {|a,b,o|IIF(oBrowse:colPos=1,(aDir[n,11]:=!aDir[n,11],oBrowse:refreshCurrent()),nil)}}

DCBROWSECOL DATA {|x|x:=DC_GetColArray(11,oBrowse),IIF(x,'R',' ')} ;
      PARENT oBrowse HEADER 'Sel 2' WIDTH 4 ;
      FONT '8.Wingdings 2' ;
      EVAL {|oB|oB:dataArea:lbClick := {|a,b,o|IIF(oBrowse:colPos=2,(aDir[n,11]:=!aDir[n,11],oBrowse:refreshCurrent()),nil)}}

DCBROWSECOL ELEMENT 1 PARENT oBrowse HEADER 'Name' WIDTH 10
DCBROWSECOL ELEMENT 2 PARENT oBrowse HEADER 'Size' WIDTH 8
DCBROWSECOL ELEMENT 3 PARENT oBrowse HEADER 'Date' WIDTH 8
DCBROWSECOL ELEMENT 4 PARENT oBrowse HEADER 'Time' WIDTH 8

DCGETOPTIONS AUTORESIZE

DCREAD GUI FIT ADDBUTTONS MODAL ;
     OPTIONS GetOptions ;
     TITLE 'Click in Sel 1 or Sel 2 column to Select/Unselect'

RETURN aDir





If remarke this
//MKCOLOR 11 , 0, GRA_CLR_BLUE

The error do not happen..


Attachments:
Express_Error_Msg_01.jpg
Express_Error_Msg_01.jpg [ 87.79 KiB | Viewed 1598 times ]

_________________
Pedro Alexandre
Top
 Profile  
 
PostPosted: Mon Jan 13, 2020 1:25 pm 
Offline
Site Admin
User avatar

Joined: Wed Jan 27, 2010 6:58 pm
Posts: 4144
Location: Boise, Idaho USA
It appears that the regression started in build 265.
You are the first person to report this problem.

I am looking into this for a fix.

_________________
The eXpress train is coming - and it has more cars.


Top
 Profile  
 
PostPosted: Mon Jan 13, 2020 4:35 pm 
Offline
Site Admin
User avatar

Joined: Wed Jan 27, 2010 6:58 pm
Posts: 4144
Location: Boise, Idaho USA
The usage of MARK and MKCOLOR are a bit ambiguous in the documentation.
It states that MKCOLOR requires a code block as the first clause, however you are sending a numeric (11).
The code block receives the row array element as a parameter, but this is not documented.
That will be corrected.

This apparently is a very under used feature of DCBROWSE.

Your program did not use the command that the way it was documented, however it worked anyway under build 264 and earlier.

If you make the below change, it will work in all versions of eXpress++:
Code:
      MKCOLOR {|n|aDir[n,11]}, 0, GRA_CLR_BLUE

_________________
The eXpress train is coming - and it has more cars.


Top
 Profile  
 
PostPosted: Tue Jan 14, 2020 2:07 am 
Offline
User avatar

Joined: Tue Feb 09, 2010 3:06 am
Posts: 137
Ok, Thank you.

_________________
Pedro Alexandre


Top
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 4 posts ] 

All times are UTC - 7 hours


Who is online

Users browsing this forum: Google [Bot] and 14 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
cron
Powered by phpBB® Forum Software © phpBB Group