in GETOPTIONS the COLORGETS and DISABLEDCOLOR does not work

[digitsoft]

Hi Roger
in GETOPTIONS the COLORGETS and DISABLEDCOLOR does not work if I use DCCOMBOBOX, DCCHECKBOX, DCMULTILINE ignores him the color that has a picture attached place.

[rdonnay]

It probably never did work because it was designed only to work with @..SAY..GET and @..DCGET.

I will look into what it will take to enhance this capability.

[digitsoft]

thanks Roger
That would be great.

It probably never did work because it was designed only to work with @..SAY..GET and @..DCGET.

I will look into what it will take to enhance this capability.

[rdonnay]

I don't understand your problem.
I was wrong about only GETS supporting DISABLEDCOLOR.
I looked at my source code and it is supported by all DC* commands.

Run this sample:

Code: Select all

#INCLUDE "dcdialog.CH"

FUNCTION Main()

LOCAL GetList[0], cName := 'Hello there', GetOptions, lCheck := .t., ;
      cMle := ''

@ 0,0 DCGET cName WHEN {||.t.}
@ 2,0 DCGET cName WHEN {||.f.}

@ 4,0 DCCHECKBOX lCheck PROMPT 'Check Me' WHEN {||.t.}
@ 6,0 DCCHECKBOX lCheck PROMPT 'Check Me' WHEN {||.f.}

@ 8,0 DCMULTILINE cMle SIZE 30,2 WHEN {||.t.}
@11,0 DCMULTILINE cMle SIZE 30,2 WHEN {||.f.}

DCGETOPTIONS DISABLEDCOLOR GRA_CLR_CYAN

DCREAD GUI FIT OPTIONS GetOptions

RETURN nil


PROC appsys ; RETURN

[digitsoft]

Hi Roger
in COMBOBOX not Work
and DC CHECKBOX works differently if you only paints the foreground color Caption with having disabledColor it would look better



#INCLUDE "dcdialog.CH"

FUNCTION Main()

LOCAL GetList[0], cName := 'Hello there', GetOptions, lCheck := .t., ;
cMle := '', aCombo := {'Hello there 1','Hello there 2','Hello there 3',' '}, cCombo := 'Hello there 1'

@ 0,0 DCGET cName WHEN {||.t.}
@ 2,0 DCGET cName WHEN {||.f.}

@ 4,0 DCCHECKBOX lCheck PROMPT 'Check Me' WHEN {||.t.}
@ 6,0 DCCHECKBOX lCheck PROMPT 'Check Me' WHEN {||.f.}

@ 8,0 DCMULTILINE cMle SIZE 30,2 WHEN {||.t.}
@11,0 DCMULTILINE cMle SIZE 30,2 WHEN {||.f.}

@ 14.4,0 DCCOMBOBOX cCombo LIST aCombo TYPE XBPCOMBO_DROPDOWNLIST SIZE 12.9,04 WHEN {||.t.}
@ 16.4,0 DCCOMBOBOX cCombo LIST aCombo TYPE XBPCOMBO_DROPDOWNLIST SIZE 12.9,04 WHEN {||.f.}


DCGETOPTIONS DISABLEDCOLOR GRA_CLR_CYAN

DCREAD GUI FIT OPTIONS GetOptions

RETURN nil


PROC appsys ; RETURN

I don't understand your problem.
I was wrong about only GETS supporting DISABLEDCOLOR.
I looked at my source code and it is supported by all DC* commands.

Run this sample:

Code: Select all

#INCLUDE "dcdialog.CH"

FUNCTION Main()

LOCAL GetList[0], cName := 'Hello there', GetOptions, lCheck := .t., ;
      cMle := ''

@ 0,0 DCGET cName WHEN {||.t.}
@ 2,0 DCGET cName WHEN {||.f.}

@ 4,0 DCCHECKBOX lCheck PROMPT 'Check Me' WHEN {||.t.}
@ 6,0 DCCHECKBOX lCheck PROMPT 'Check Me' WHEN {||.f.}

@ 8,0 DCMULTILINE cMle SIZE 30,2 WHEN {||.t.}
@11,0 DCMULTILINE cMle SIZE 30,2 WHEN {||.f.}

DCGETOPTIONS DISABLEDCOLOR GRA_CLR_CYAN

DCREAD GUI FIT OPTIONS GetOptions

RETURN nil


PROC appsys ; RETURN

[digitsoft]

Hi Roger
Can you tell me where is the code DCCHECKBOX and DCCOMBOBOX to make the change disabledColor, then I pass code.

[digitsoft]

Hi Roger
Just do not function in DCCOMBOBOX

[rdonnay]

Can you tell me where is the code DCCHECKBOX and DCCOMBOBOX to make the change disabledColor, then I pass code.

Disabled color is part of Presentation Parameters.

My code already sets the PP correctly, however XbpComboBox() does not behave correctly.

This appears to be a problem with Xbase++.

[digitsoft]

thanks Roger
For your help.