Page 1 of 1

Is there a way to hide the group in the dialogue?

Posted: Sat Apr 05, 2014 6:58 pm
by Eugene Lutsenko
Is there a way to hide or show groups in dialogue zavismosti from values ​​previously entered variables?
Something like this (it works fine):

Code: Select all

@ 5.25, 2 DCSAY 'В качестве классов рассматриваются:' PARENT oGroup7 EDITPROTECT {|| .NOT.mScenario=3 } HIDE {|| .NOT.mScenario=3 }
And unfortunately it is already causing compile-time error:

Code: Select all

@ 5.25, 2 DCGROUP oGroup8  CAPTION 'В качестве классов рассматриваются:' SIZE mWidthFrame*2+1,3.5  PARENT oGroup7 EDITPROTECT {|| .NOT.mScenario=3 } HIDE {|| .NOT.mScenario=3 }

Re: Is there a way to hide the group in the dialogue?

Posted: Sat Apr 05, 2014 10:28 pm
by Wolfgang Ciriack
Remove the EDITPROTECT clause of DCGROUP.

Re: Is there a way to hide the group in the dialogue?

Posted: Sun Apr 06, 2014 11:56 am
by Eugene Lutsenko
When I select the variant red, then appear below its corresponding input fields with comments. When choosing another option, these fields disappear:

Code: Select all

   mStrinFrame = mStrinFrame+4
********************************
   @mStrinFrame, 0              DCGROUP oGroup7 CAPTION 'Задание параметров формирования сценариев или способа интерпретации текстовых полей "Inp_data":' SIZE mWidthFrame*2+3, 12.5
   @ 1, 2                       DCRADIO mScenario VALUE 1 PROMPT 'Не применять сценарный метод АСК-анализа и спец.интерпретацию TXT-полей' PARENT oGroup7 SIZE 0
   @ 2, 2                       DCRADIO mScenario VALUE 2 PROMPT 'Применить сценарный метод прогнозирования АСК-анализа'                  PARENT oGroup7 SIZE 0
   @ 3, 2                       DCRADIO mScenario VALUE 3 PROMPT 'Применить специальную интерпретацию текстовых полей "Inp_data"'         PARENT oGroup7 SIZE 0

   @ 1.7, mWidthFrame+3+19      DCPUSHBUTTON CAPTION "Пояснения по режиму" SIZE 30, 2.1 ACTION {||Help2_3_2_2scen()} PARENT oGroup7
********************************
   @ 4.6,2+2.5                  DCSAY "Параметры формирования сценариев:"      PARENT oGroup7                 EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 }  FONT "10.HelvBold" SIZE 0
   @ 5.5,2+2.5                  DCSAY "Глубина предыстории минимальная :"      PARENT oGroup7                 EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 } 
   @ 6.5,2+2.5                  DCSAY "Глубина предыстории минимальная :"      PARENT oGroup7                 EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 } 
   @ 6.5,2+2.5                  DCSAY "Глубина предыстории максимальная:"      PARENT oGroup7                 EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 } 
   @ 5.5,mPosGet                DCGET mGlubMin                                 PARENT oGroup7 PICTURE "#####" EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 }
   @ 6.5,mPosGet                DCGET mGlubMax                                 PARENT oGroup7 PICTURE "#####" EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 }
   @ 5.5,mWidthFrame+3+2.5      DCSAY "Горизонт прогнозирования минимальный :" PARENT oGroup7                 EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 } 
   @ 6.5,mWidthFrame+3+2.5      DCSAY "Горизонт прогнозирования максимальный:" PARENT oGroup7                 EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 } 
   @ 5.5,mWidthFrame+3+mPosGet  DCGET mGorizMin                                PARENT oGroup7 PICTURE "#####" EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 }
   @ 6.5,mWidthFrame+3+mPosGet  DCGET mGorizMAx                                PARENT oGroup7 PICTURE "#####" EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 }
[/size]
Image

But I can not do it when the fields should be grouped. I know that if you remove EDITPROTETST, the compiler error disappears. But I need a similar construction for groups. That's what I'm asking.

PS please excuse for disgusting automated translation

Code: Select all

********************************
   @ 7.1, 2+2.5                 DCSAY 'Параметры интерпретации значений текстовых полей "Inp_data":'          PARENT oGroup7 EDITPROTECT {|| .NOT.mScenario=3 } HIDE {|| .NOT.mScenario=3 } FONT "10.HelvBold" SIZE 0
   @ 8.25, 2                    DCGROUP oGroup8  CAPTION 'В качестве классов рассматриваются:' SIZE mWidthFrame-2,3.5  PARENT oGroup7
   @ 1, 2                       DCRADIO mTxtCSField VALUE 1 PROMPT 'Целые знач.полей'                         PARENT oGroup8
   @ 1, 2+19                    DCRADIO mTxtCSField VALUE 2 PROMPT 'Элементы знач.полей-символы'              PARENT oGroup8
   @ 2, 2                       DCRADIO mTxtCSField VALUE 3 PROMPT 'Элементы значений полей по разделителю:'  PARENT oGroup8
   @ 2, mPosGet-2               DCGET mTxtCSSep                                                               PARENT oGroup8

   @ 8.25, mWidthFrame+3        DCGROUP oGroup9  CAPTION 'В качестве признаков рассматриваются:' SIZE mWidthFrame-2,3.5  PARENT oGroup7
   @ 1, 2                       DCRADIO mTxtOSField VALUE 1 PROMPT 'Целые знач.полей'                         PARENT oGroup9
   @ 1, 2+19                    DCRADIO mTxtOSField VALUE 2 PROMPT 'Элементы знач.полей-символы'              PARENT oGroup9
   @ 2, 2                       DCRADIO mTxtOSField VALUE 3 PROMPT 'Элементы значений полей по разделителю:'  PARENT oGroup9
   @ 2, mPosGet                 DCGET mTxtOSSep                                                               PARENT oGroup9
********************************
[/size]
Image

I would like to dialogue groups is not visualized when not selected third paragraph (blue). Similarly to the way it turned out to make the second paragraph (red). It must be added that the group would shields or masks action EDITPROTECT variable defined outside the group. Then I would use the same place on the screen form for alternative dialogue and before the eyes of the user would be less unnecessary information not relevant to the case.

Re: Is there a way to hide the group in the dialogue?

Posted: Sun Apr 06, 2014 11:12 pm
by Wolfgang Ciriack
Put the HIDE clause {|| mScenario<>2} or {|| mScenario<>3} to the Groups.

Re: Is there a way to hide the group in the dialogue?

Posted: Mon Apr 07, 2014 1:33 am
by Eugene Lutsenko
Thank you very much! Be sure to try. That's what I asked

Re: Is there a way to hide the group in the dialogue?

Posted: Mon Apr 07, 2014 3:03 am
by Eugene Lutsenko
Wrote:

Code: Select all

********************************
   @ 7.1, 2+2.5                 DCSAY 'Параметры интерпретации значений текстовых полей "Inp_data":'          PARENT oGroup7 EDITPROTECT {|| .NOT.mScenario=3 } HIDE {|| .NOT.mScenario=3 } FONT "10.HelvBold" SIZE 0
   @ 8.25, 2                    DCGROUP oGroup8  CAPTION 'В качестве классов рассматриваются:' SIZE mWidthFrame-2,3.5  PARENT oGroup7 HIDE clause {|| mScenario<>2}
   @ 1, 2                       DCRADIO mTxtCSField VALUE 1 PROMPT 'Целые знач.полей'                         PARENT oGroup8
   @ 1, 2+19                    DCRADIO mTxtCSField VALUE 2 PROMPT 'Элементы знач.полей-символы'              PARENT oGroup8
   @ 2, 2                       DCRADIO mTxtCSField VALUE 3 PROMPT 'Элементы значений полей по разделителю:'  PARENT oGroup8
   @ 2, mPosGet-2               DCGET mTxtCSSep                                                               PARENT oGroup8

   @ 8.25, mWidthFrame+3        DCGROUP oGroup9  CAPTION 'В качестве признаков рассматриваются:' SIZE mWidthFrame-2,3.5  PARENT oGroup7 HIDE clause {|| mScenario<>2}
   @ 1, 2                       DCRADIO mTxtOSField VALUE 1 PROMPT 'Целые знач.полей'                         PARENT oGroup9
   @ 1, 2+19                    DCRADIO mTxtOSField VALUE 2 PROMPT 'Элементы знач.полей-символы'              PARENT oGroup9
   @ 2, 2                       DCRADIO mTxtOSField VALUE 3 PROMPT 'Элементы значений полей по разделителю:'  PARENT oGroup9
   @ 2, mPosGet                 DCGET mTxtOSSep                                                               PARENT oGroup9
********************************
[/size]

When compiling and linking got the message:


D:\ALASKA\AIDOS-X>CLS

D:\ALASKA\AIDOS-X>ARC _Aidos.arc

D:\ALASKA\AIDOS-X>XPP _aidos-x
_aidos-x.prg(27982:0): error XBT0251: Reserved keyword
_aidos-x.prg(27988:0): error XBT0251: Reserved keyword

D:\ALASKA\AIDOS-X>ALINK _aidos-x _Aidos.res /PM:PM
Alaska 32-Bit Linker Version 1.90.355
Copyright (c) Alaska Software 1997-2009. All rights reserved.

Could you tell me what is my mistake?

Re: Is there a way to hide the group in the dialogue?

Posted: Mon Apr 07, 2014 5:35 am
by Tom
Remove the word "clause" behind "HIDE". The correct syntax is: HIDE {|| ... }, no "clause".

Re: Is there a way to hide the group in the dialogue?

Posted: Mon Apr 07, 2014 6:41 am
by Eugene Lutsenko
Thank you all! Get a great, exactly what I wanted:

Image
Image

Code: Select all

   mStrinFrame = mStrinFrame+4
********************************
   @mStrinFrame, 0              DCGROUP oGroup7 CAPTION 'Задание параметров формирования сценариев или способа интерпретации текстовых полей "Inp_data":' SIZE mWidthFrame*2+3, 10.5
   @ 1, 2                       DCRADIO mScenario VALUE 1 PROMPT 'Не применять сценарный метод АСК-анализа и спец.интерпретацию TXT-полей' PARENT oGroup7 SIZE 0
   @ 2, 2                       DCRADIO mScenario VALUE 2 PROMPT 'Применить сценарный метод прогнозирования АСК-анализа'                   PARENT oGroup7 SIZE 0
   @ 3, 2                       DCRADIO mScenario VALUE 3 PROMPT 'Применить специальную интерпретацию текстовых полей "Inp_data"'          PARENT oGroup7 SIZE 0

   @ 1.7, mWidthFrame+3+19      DCPUSHBUTTON CAPTION "Пояснения по режиму" SIZE 30, 2.1 ACTION {||Help2_3_2_2scen()} PARENT oGroup7
********************************
   @ 5.1,2+2.5                  DCSAY "Параметры формирования сценариев:"      PARENT oGroup7                 EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 }  FONT "10.HelvBold" SIZE 0
   @ 6.5,2                      DCGROUP oGroup8  CAPTION 'Прошлый период:' SIZE mWidthFrame-2,3.5  PARENT oGroup7 HIDE {|| .NOT.mScenario=2 }
   @ 1,2                        DCSAY "Глубина предыстории минимальная :"      PARENT oGroup8                  EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 } 
   @ 2,2                        DCSAY "Глубина предыстории максимальная:"      PARENT oGroup8                  EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 } 
   @ 1,mPosGet-2                DCGET mGlubMin                                 PARENT oGroup8  PICTURE "#####" EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 }
   @ 2,mPosGet-2                DCGET mGlubMax                                 PARENT oGroup8  PICTURE "#####" EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 }

   @ 6.5,mWidthFrame+3          DCGROUP oGroup10  CAPTION 'Будущий период:' SIZE mWidthFrame-2,3.5  PARENT oGroup7 HIDE {|| .NOT.mScenario=2 }
   @ 1,2                        DCSAY "Горизонт прогнозирования минимальный :" PARENT oGroup10                 EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 } 
   @ 2,2                        DCSAY "Горизонт прогнозирования максимальный:" PARENT oGroup10                 EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 } 
   @ 1,mPosGet                  DCGET mGorizMin                                PARENT oGroup10 PICTURE "#####" EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 }
   @ 2,mPosGet                  DCGET mGorizMAx                                PARENT oGroup10 PICTURE "#####" EDITPROTECT {|| .NOT.mScenario=2 } HIDE {|| .NOT.mScenario=2 }
********************************
   @ 5.1,2+2.5                  DCSAY 'Параметры интерпретации значений текстовых полей "Inp_data":'           PARENT oGroup7 EDITPROTECT {|| .NOT.mScenario=3 } HIDE {|| .NOT.mScenario=3 } FONT "10.HelvBold" SIZE 0
   @ 6.5,2                      DCGROUP oGroup11  CAPTION 'В качестве классов рассматриваются:' SIZE mWidthFrame-2,3.5   PARENT oGroup7 HIDE {|| .NOT.mScenario=3 }
   @ 1,2                        DCRADIO mTxtCSField VALUE 1 PROMPT 'Целые знач.полей'                          PARENT oGroup11
   @ 1,2+19                     DCRADIO mTxtCSField VALUE 2 PROMPT 'Элементы знач.полей-символы'               PARENT oGroup11
   @ 2,2                        DCRADIO mTxtCSField VALUE 3 PROMPT 'Элементы значений полей по разделителю:'   PARENT oGroup11
   @ 2,mPosGet-2                DCGET mTxtCSSep                                                                PARENT oGroup11
 
   @ 6.5,mWidthFrame+3          DCGROUP oGroup12  CAPTION 'В качестве признаков рассматриваются:' SIZE mWidthFrame-2,3.5 PARENT oGroup7 HIDE {|| .NOT.mScenario=3 }
   @ 1,2                        DCRADIO mTxtOSField VALUE 1 PROMPT 'Целые знач.полей'                          PARENT oGroup12
   @ 1,2+19                     DCRADIO mTxtOSField VALUE 2 PROMPT 'Элементы знач.полей-символы'               PARENT oGroup12
   @ 2,2                        DCRADIO mTxtOSField VALUE 3 PROMPT 'Элементы значений полей по разделителю:'   PARENT oGroup12
   @ 2,mPosGet                  DCGET mTxtOSSep                                                                PARENT oGroup12
********************************
[/size]