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]
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]
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:
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]