In DCBROWSE to assign a particular string on a given bckgrnd
- Eugene Lutsenko
- Posts: 1649
- Joined: Sat Feb 04, 2012 2:23 am
- Location: Russia, Southern federal district, city of Krasnodar
- Contact:
In DCBROWSE to assign a particular string on a given bckgrnd
In DCBROWSE to assign a particular string on a given background?
Re: In DCBROWSE to assign a particular string on a given bck
Your question is confusing. Please clarify.
The eXpress train is coming - and it has more cars.
- Eugene Lutsenko
- Posts: 1649
- Joined: Sat Feb 04, 2012 2:23 am
- Location: Russia, Southern federal district, city of Krasnodar
- Contact:
Re: In DCBROWSE to assign a particular string on a given bck
I know how to make in DCBROWSE the background in the specified column (for example yellow). But I don't know how to make the background in the given string (for example green).
- Attachments
-
- 4136_2.jpg (175.17 KiB) Viewed 15366 times
Re: In DCBROWSE to assign a particular string on a given bck
This will paint every record that has an even record number as PALEGRAY and every record that has an odd number as WHITE.
Code: Select all
@ .. DCBROWSE .. COLOR {||IIF(Recno()%2==0,{nil,GRA_CLR_PALEGRAY},{nil,GRA_CLR_WHITE})}
The eXpress train is coming - and it has more cars.
- Eugene Lutsenko
- Posts: 1649
- Joined: Sat Feb 04, 2012 2:23 am
- Location: Russia, Southern federal district, city of Krasnodar
- Contact:
Re: In DCBROWSE to assign a particular string on a given bck
Thank You, Roger!
This is great work! This is the blue highlighted column with the F-measure of the validity of different models of van Ritbergen and the same color of the selected row in the models and integral criteria, for which it is maximum. Very clear, comfortable and beautiful. Thank you!
[/size]
This is great work! This is the blue highlighted column with the F-measure of the validity of different models of van Ritbergen and the same color of the selected row in the models and integral criteria, for which it is maximum. Very clear, comfortable and beautiful. Thank you!
Code: Select all
@ 1, 0 DCBROWSE oBrowse ALIAS 'Dost_modCls' SIZE 217,27 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 4 ; // Кол-во строк в заголовке
FREEZELEFT {1,2} ; // При горизонтальной прокрутке не прокручивать первые 2 колонки
COLOR {||IIF(L2_mera=M_MaxValL2, {nil,aColor[153]},IIF(L1_mera=M_MaxValL1,{nil,aColor[107]},IIF(F_mera=M_MaxValF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))}
- Attachments
-
- 4136_4.jpg (179.3 KiB) Viewed 15348 times
-
- 4136_3.jpg (169.09 KiB) Viewed 15355 times
- Eugene Lutsenko
- Posts: 1649
- Joined: Sat Feb 04, 2012 2:23 am
- Location: Russia, Southern federal district, city of Krasnodar
- Contact:
Re: In DCBROWSE to assign a particular string on a given bck
Somehow, in this form at the bottom of the desired rows are highlighted in the background and in the top window are not highlighted. Don't know why. Sort of been doing the same thing.
[/size]
Code: Select all
/* ----- Create browse-1 ----- */
bScale := {|| VerModCls->(DC_SetScope(0,VerModClsIT->ModIntKrit)), ;
VerModCls->(DC_SetScope(1,VerModClsIT->ModIntKrit)), ;
VerModCls->(DC_DbGoTop()), ;
oBrowGrSc:refreshAll() }
DO CASE
CASE M_MaxValAllF <= M_MaxValAllL1 .AND. M_MaxValAllL1 <= M_MaxValAllL2
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
CASE M_MaxValAllF <= M_MaxValAllL2 .AND. M_MaxValAllL2 <= M_MaxValAllL1
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
CASE M_MaxValAllL1 <= M_MaxValAllF .AND. M_MaxValAllF <= M_MaxValAllL2
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
CASE M_MaxValAllL1 <= M_MaxValAllL2 .AND. M_MaxValAllL2 <= M_MaxValAllF
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
CASE M_MaxValAllL2 <= M_MaxValAllF .AND. M_MaxValAllF <= M_MaxValAllL1
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
CASE M_MaxValAllL2 <= M_MaxValAllL1 .AND. M_MaxValAllL1 <= M_MaxValAllF
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
ENDCASE
WNF = 9 // Ширина числового поля
DCSETPARENT oBrowScale
* Строка заданным фоном
DCBROWSECOL FIELD VerModClsIT->Name_Mod HEADER "Наименование модели;и частного критерия" PARENT oBrowScale FONT "9.Courier" WIDTH 75
DCBROWSECOL FIELD VerModClsIT->Int_Krit HEADER "Наименование;интегрального критерия" PARENT oBrowScale FONT "9.Courier" WIDTH 20
DCBROWSECOL DATA FieldAnchorA(14,"VerModClsIT",9,3) HEADER "Точность;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(15,"VerModClsIT",9,3) HEADER "Полнота;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(16,"VerModClsIT",9,3) HEADER "F-мера;Ван Ризбергена" PARENT oBrowScale FONT "9.Courier" WIDTH 15 COLOR {||{nil,aColor[33]}}
DCBROWSECOL DATA FieldAnchorA(30,"VerModClsIT",9,3) HEADER "S-Точность;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(31,"VerModClsIT",9,3) HEADER "S-Полнота;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(32,"VerModClsIT",9,3) HEADER "L1-мера;проф.Е.В.Луценко" PARENT oBrowScale FONT "9.Courier" WIDTH 15 COLOR {||{nil,aColor[107]}}
DCBROWSECOL DATA FieldAnchorA(37,"VerModClsIT",9,3) HEADER "A-Точность;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(38,"VerModClsIT",9,3) HEADER "A-Полнота;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(39,"VerModClsIT",9,3) HEADER "L2-мера;проф.Е.В.Луценко" PARENT oBrowScale FONT "9.Courier" WIDTH 15 COLOR {||{nil,aColor[153]}}
/* ----- Create browse-2 ----- */
DCSETPARENT TO
DO CASE
CASE M_MaxValClsF <= M_MaxValClsL1 .AND. M_MaxValClsL1 <= M_MaxValClsL2
@ 9, 0 DCBROWSE oBrowGrSc ALIAS 'VerModCls' SIZE 217,27 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 8 ; // Кол-во строк в заголовке
FREEZELEFT {1,2} ; // При горизонтальной прокрутке не прокручивать первые 2 колонки
NOSOFTTRACK ;
SCOPE ;
ITEMMARKED bItems;
COLOR {||IIF(L2_mera=M_MaxValClsL2, {nil,aColor[153]},IIF(L1_mera=M_MaxValClsL1,{nil,aColor[107]},IIF(F_mera=M_MaxValClsF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))}
CASE M_MaxValClsF <= M_MaxValClsL2 .AND. M_MaxValClsL2 <= M_MaxValClsL1
@ 9, 0 DCBROWSE oBrowGrSc ALIAS 'VerModCls' SIZE 217,27 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 8 ; // Кол-во строк в заголовке
FREEZELEFT {1,2} ; // При горизонтальной прокрутке не прокручивать первые 2 колонки
NOSOFTTRACK ;
SCOPE ;
ITEMMARKED bItems;
COLOR {||IIF(L1_mera=M_MaxValClsL1, {nil,aColor[107]},IIF(L2_mera=M_MaxValClsL2,{nil,aColor[153]},IIF(F_mera=M_MaxValClsF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))}
CASE M_MaxValClsL1 <= M_MaxValClsF .AND. M_MaxValClsF <= M_MaxValClsL2
@ 9, 0 DCBROWSE oBrowGrSc ALIAS 'VerModCls' SIZE 217,27 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 8 ; // Кол-во строк в заголовке
FREEZELEFT {1,2} ; // При горизонтальной прокрутке не прокручивать первые 2 колонки
NOSOFTTRACK ;
SCOPE ;
ITEMMARKED bItems;
COLOR {||IIF(L2_mera=M_MaxValClsL2, {nil,aColor[153]},IIF(F_mera =M_MaxValClsF,{nil,aColor[33]},IIF(L1_mera=M_MaxValClsL1,{nil,aColor[107]},{nil,GRA_CLR_WHITE})))}
CASE M_MaxValClsL1 <= M_MaxValClsL2 .AND. M_MaxValClsL2 <= M_MaxValClsF
@ 9, 0 DCBROWSE oBrowGrSc ALIAS 'VerModCls' SIZE 217,27 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 8 ; // Кол-во строк в заголовке
FREEZELEFT {1,2} ; // При горизонтальной прокрутке не прокручивать первые 2 колонки
NOSOFTTRACK ;
SCOPE ;
ITEMMARKED bItems;
COLOR {||IIF(F_mera=M_MaxValClsF, {nil,aColor[33]},IIF(L2_mera=M_MaxValClsL2,{nil,aColor[153]},IIF(L1_mera=M_MaxValClsL1,{nil,aColor[107]},{nil,GRA_CLR_WHITE})))}
CASE M_MaxValClsL2 <= M_MaxValClsF .AND. M_MaxValClsF <= M_MaxValClsL1
@ 9, 0 DCBROWSE oBrowGrSc ALIAS 'VerModCls' SIZE 217,27 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 8 ; // Кол-во строк в заголовке
FREEZELEFT {1,2} ; // При горизонтальной прокрутке не прокручивать первые 2 колонки
NOSOFTTRACK ;
SCOPE ;
ITEMMARKED bItems;
COLOR {||IIF(L1_mera=M_MaxValClsL1, {nil,aColor[107]},IIF(F_mera=M_MaxValClsF,{nil,aColor[33]},IIF(L2_mera=M_MaxValClsL2,{nil,aColor[153]},{nil,GRA_CLR_WHITE})))}
CASE M_MaxValClsL2 <= M_MaxValClsL1 .AND. M_MaxValClsL1 <= M_MaxValClsF
@ 9, 0 DCBROWSE oBrowGrSc ALIAS 'VerModCls' SIZE 217,27 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 8 ; // Кол-во строк в заголовке
FREEZELEFT {1,2} ; // При горизонтальной прокрутке не прокручивать первые 2 колонки
NOSOFTTRACK ;
SCOPE ;
ITEMMARKED bItems;
COLOR {||IIF(F_mera=M_MaxValClsF, {nil,aColor[33]},IIF(L1_mera=M_MaxValClsL1,{nil,aColor[107]},IIF(L2_mera =M_MaxValClsL2,{nil,aColor[153]},{nil,GRA_CLR_WHITE})))}
ENDCASE
DCSETPARENT oBrowGrSc
WNF = 9
* Строка заданным фоном
DCBROWSECOL DATA FieldAnchor( 2,6,0) HEADER "Код;класса" PARENT oBrowGrSc FONT "9.Courier" WIDTH 6
DCBROWSECOL FIELD VerModCls->Name_cls HEADER "Наименование;класса" PARENT oBrowGrSc FONT "9.Courier" WIDTH 25
DCBROWSECOL DATA FieldAnchor( 4,9,3) HEADER "Дифферен-;циальная;досто-;верность;модели;{-1, +1}" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor( 8,9,0) HEADER "Кол-во;логических;объектов;выборки" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor( 9,9,0) HEADER "Число истино-;положительных;решений (TP)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(12,9,0) HEADER "Число истино-;отрицательных;решений (TN)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(11,9,0) HEADER "Число ложно- ;положительных;решений (FP)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(10,9,0) HEADER "Число ложно- ;отрицательных;решений (FN)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(14,9,3) HEADER "Точность;модели" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(15,9,3) HEADER "Полнота ;модели" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(16,9,3) HEADER "F-мера ;Ван;Ризбергена" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF COLOR {||{nil,aColor[33]}}
DCBROWSECOL DATA FieldAnchor(26,9,3) HEADER "Сумма модулей;уровней сходства;истино-положит.;решений (STP)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(29,9,3) HEADER "Сумма модулей;уровней сходства;истино-отрицат.;решений (STN)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(28,9,3) HEADER "Сумма модулей;уровней сходства;ложно-положит.;решений (SFP)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(27,9,3) HEADER "Сумма модулей;уровней сходства;ложно-отрицат.;решений (SFN)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(30,9,3) HEADER "S-Точность;модели" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(31,9,3) HEADER "S-Полнота ;модели" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(32,9,3) HEADER "L1-мера ;проф.;Е.В.Луценко" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF COLOR {||{nil,aColor[107]}}
DCBROWSECOL DATA FieldAnchor(33,9,3) HEADER "Средний модуль;уровней сходства;истино-положит.;решений;(ATP=STP/TP)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(34,9,3) HEADER "Средний модуль;уровней сходства;истино-отрицат.;решений;(ATN=STN/TN)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(35,9,3) HEADER "Средний модуль;уровней сходства;ложно-положит.;решений;(AFP=SFP/FP)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(36,9,3) HEADER "Средний модуль;уровней сходства;ложно-отрицат.;решений;(AFN=SFN/FN)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(37,9,3) HEADER "A-Точность;модели;APrecision;= ATP/(ATP+AFP)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(38,9,3) HEADER "A-Полнота ;модели;ARecall;= ATP/(ATP+AFN)" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(39,9,3) HEADER "L2-мера ;проф.;Е.В.Луценко" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF COLOR {||{nil,aColor[153]}}
DCBROWSECOL DATA FieldAnchor( 5,9,3) HEADER "Средний;модуль;уровня;сходства;ВЕРНО;идентиф.;и неидент.;объектов" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor( 6,9,3) HEADER "Средний;модуль;уровня;сходства;ОШИБ.;идентиф.;и неидент.;объектов" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor( 7,9,3) HEADER "Разность;ср.модулей;ур.сход.;ВЕРНО и;ОШИБ.;идентиф.;и неидент.;объектов" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(17,9,3) HEADER "Процент ;правильной;идентификации" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(18,9,3) HEADER "Процент ;правильной;не идентификации" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(19,9,3) HEADER "Процент ;ошибочной ;идентификации" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(20,9,3) HEADER "Процент ;ошибочной ;не идентификации" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(21,9,3) HEADER "Вероятн.;случайн.;угадыв.;принадл.;объектов;к классам" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(22,9,3) HEADER "Вероятн.;случайн.;угадыв.;непринадл.;объектов;к классам" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(23,9,3) HEADER "Эффект.;модели;при;идентиф.:;=C13/C17" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(24,9,3) HEADER "Эффект.;модели;при;неидент.:;=C14/C18" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL DATA FieldAnchor(25,9,3) HEADER "Средняя;эффект.;модели:;=(C19+;C20)/2" PARENT oBrowGrSc FONT "9.Courier" WIDTH WNF
DCBROWSECOL FIELD VerModCls->Date HEADER "Дата;получения;результата" PARENT oBrowGrSc FONT "9.Courier" WIDTH 10
DCBROWSECOL FIELD VerModCls->Time HEADER "Время;получения;результата" PARENT oBrowGrSc FONT "9.Courier" WIDTH 8
DCGETOPTIONS SAYFONT '10.Helv Bold' TABSTOP AUTORESIZE
cTitle = '4.1.3.8. Стат.анализ результатов идентификации по классам, моделям и инт.критериям'+'. Текущая модель: "'+UPPER(Ar_Model[M_CurrInf])+'"'
DCREAD GUI ;
FIT ;
OPTIONS GetOptions ;
MODAL ;
TITLE cTitle ;
EVAL {|o|SetAppFocus(oBrowScale:GetColumn(1))}
- Attachments
-
- 4136_5.jpg (181.16 KiB) Viewed 15334 times
Re: In DCBROWSE to assign a particular string on a given bck
Eugene, the DCBROWSE definitions for the 1st browse all seem to be using the same variables in the tests and are therefore identical...Eugene Lutsenko wrote:Somehow, in this form at the bottom of the desired rows are highlighted in the background and in the top window are not highlighted. Don't know why. Sort of been doing the same thing.
[/size]Code: Select all
/* ----- Create browse-1 ----- */ ...snip
Or am I seeing that wrong?
Regan Cawkwell
Real Business Applications Ltd
http://www.rbauk.com
Real Business Applications Ltd
http://www.rbauk.com
- Eugene Lutsenko
- Posts: 1649
- Joined: Sat Feb 04, 2012 2:23 am
- Location: Russia, Southern federal district, city of Krasnodar
- Contact:
Re: In DCBROWSE to assign a particular string on a given bck
Yes, the names of the fields in the top and bottom are the same. But it's a different base. The upper base to the final model. And the bottom more detailed, with a breakdown of the top lines of the base.
Re: In DCBROWSE to assign a particular string on a given bck
But from what I see, the DBBROWSE definitions for the top browse are EXACTLY identical. They use all the same variables...is that right?Eugene Lutsenko wrote:Yes, the names of the fields in the top and bottom are the same. But it's a different base. The upper base to the final model. And the bottom more detailed, with a breakdown of the top lines of the base.
Perhaps I am not understanding correctly where the problem is, after all...
Regan Cawkwell
Real Business Applications Ltd
http://www.rbauk.com
Real Business Applications Ltd
http://www.rbauk.com
- Eugene Lutsenko
- Posts: 1649
- Joined: Sat Feb 04, 2012 2:23 am
- Location: Russia, Southern federal district, city of Krasnodar
- Contact:
Re: In DCBROWSE to assign a particular string on a given bck
It's all good! Thank you very much. But only made specific reference to the fields (VerModClsIT->L2_mera) for the database:
[/size]
Code: Select all
DO CASE
CASE M_MaxValAllF <= M_MaxValAllL1 .AND. M_MaxValAllL1 <= M_MaxValAllL2
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(VerModClsIT->L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(VerModClsIT->L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(VerModClsIT->F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
CASE M_MaxValAllF <= M_MaxValAllL2 .AND. M_MaxValAllL2 <= M_MaxValAllL1
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(VerModClsIT->L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(VerModClsIT->L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(VerModClsIT->F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
CASE M_MaxValAllL1 <= M_MaxValAllF .AND. M_MaxValAllF <= M_MaxValAllL2
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(VerModClsIT->L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(VerModClsIT->L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(VerModClsIT->F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
CASE M_MaxValAllL1 <= M_MaxValAllL2 .AND. M_MaxValAllL2 <= M_MaxValAllF
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(VerModClsIT->L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(VerModClsIT->L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(VerModClsIT->F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
CASE M_MaxValAllL2 <= M_MaxValAllF .AND. M_MaxValAllF <= M_MaxValAllL1
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(VerModClsIT->L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(VerModClsIT->L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(VerModClsIT->F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
CASE M_MaxValAllL2 <= M_MaxValAllL1 .AND. M_MaxValAllL1 <= M_MaxValAllF
@ 1, 0 DCBROWSE oBrowScale ALIAS 'VerModClsIT' SIZE 217,7.5 ;
PRESENTATION DC_BrowPres() ; // Только просмотр БД Users
HEADLINES 2 ; // Кол-во строк в заголовке
NOSOFTTRACK ;
SCOPE ;
COLOR {||IIF(VerModClsIT->L2_mera=M_MaxValAllL2, {nil,aColor[153]},IIF(VerModClsIT->L1_mera=M_MaxValAllL1,{nil,aColor[107]},IIF(VerModClsIT->F_mera=M_MaxValAllF,{nil,aColor[33]},{nil,GRA_CLR_WHITE})))};
ITEMMARKED {|| Eval(bScale), DC_GetRefresh(GetList,, DCGETREFRESH_TYPE_EXCLUDE,{GETLIST_BROWSE}) }
ENDCASE
WNF = 9 // Ширина числового поля
DCSETPARENT oBrowScale
* Строка заданным фоном
DCBROWSECOL FIELD VerModClsIT->Name_Mod HEADER "Наименование модели;и частного критерия" PARENT oBrowScale FONT "9.Courier" WIDTH 75
DCBROWSECOL FIELD VerModClsIT->Int_Krit HEADER "Наименование;интегрального критерия" PARENT oBrowScale FONT "9.Courier" WIDTH 20
DCBROWSECOL DATA FieldAnchorA(14,"VerModClsIT",9,3) HEADER "Точность;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(15,"VerModClsIT",9,3) HEADER "Полнота;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(16,"VerModClsIT",9,3) HEADER "F-мера;Ван Ризбергена" PARENT oBrowScale FONT "9.Courier" WIDTH 15 COLOR {||{nil,aColor[33]}}
DCBROWSECOL DATA FieldAnchorA(30,"VerModClsIT",9,3) HEADER "S-Точность;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(31,"VerModClsIT",9,3) HEADER "S-Полнота;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(32,"VerModClsIT",9,3) HEADER "L1-мера;проф.Е.В.Луценко" PARENT oBrowScale FONT "9.Courier" WIDTH 15 COLOR {||{nil,aColor[107]}}
DCBROWSECOL DATA FieldAnchorA(37,"VerModClsIT",9,3) HEADER "A-Точность;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(38,"VerModClsIT",9,3) HEADER "A-Полнота;модели" PARENT oBrowScale FONT "9.Courier" WIDTH 10
DCBROWSECOL DATA FieldAnchorA(39,"VerModClsIT",9,3) HEADER "L2-мера;проф.Е.В.Луценко" PARENT oBrowScale FONT "9.Courier" WIDTH 15 COLOR {||{nil,aColor[153]}}
- Attachments
-
- 4138.jpg (197.3 KiB) Viewed 15280 times