In DCBROWSE to assign a particular string on a given bckgrnd

This forum is for eXpress++ general support.
Message
Author
User avatar
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

#1 Post by Eugene Lutsenko »

In DCBROWSE to assign a particular string on a given background?

User avatar
rdonnay
Site Admin
Posts: 4813
Joined: Wed Jan 27, 2010 6:58 pm
Location: Boise, Idaho USA
Contact:

Re: In DCBROWSE to assign a particular string on a given bck

#2 Post by rdonnay »

Your question is confusing. Please clarify.
The eXpress train is coming - and it has more cars.

User avatar
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

#3 Post by Eugene Lutsenko »

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
4136_2.jpg (175.17 KiB) Viewed 15360 times

User avatar
rdonnay
Site Admin
Posts: 4813
Joined: Wed Jan 27, 2010 6:58 pm
Location: Boise, Idaho USA
Contact:

Re: In DCBROWSE to assign a particular string on a given bck

#4 Post by rdonnay »

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.

User avatar
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

#5 Post by Eugene Lutsenko »

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!

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})))}
[/size]
Attachments
4136_4.jpg
4136_4.jpg (179.3 KiB) Viewed 15342 times
4136_3.jpg
4136_3.jpg (169.09 KiB) Viewed 15349 times

User avatar
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

#6 Post by Eugene Lutsenko »

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.

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))}

[/size]
Attachments
4136_5.jpg
4136_5.jpg (181.16 KiB) Viewed 15328 times

reganc
Posts: 259
Joined: Thu Jan 28, 2010 3:08 am
Location: Hersham, Surrey, UK
Contact:

Re: In DCBROWSE to assign a particular string on a given bck

#7 Post by reganc »

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.

Code: Select all

/* ----- Create browse-1 ----- */
...snip
[/size]
Eugene, the DCBROWSE definitions for the 1st browse all seem to be using the same variables in the tests and are therefore identical...

Or am I seeing that wrong?
Regan Cawkwell
Real Business Applications Ltd
http://www.rbauk.com

User avatar
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

#8 Post by Eugene Lutsenko »

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.

reganc
Posts: 259
Joined: Thu Jan 28, 2010 3:08 am
Location: Hersham, Surrey, UK
Contact:

Re: In DCBROWSE to assign a particular string on a given bck

#9 Post by reganc »

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.
But from what I see, the DBBROWSE definitions for the top browse are EXACTLY identical. They use all the same variables...is that right?

Perhaps I am not understanding correctly where the problem is, after all...
Regan Cawkwell
Real Business Applications Ltd
http://www.rbauk.com

User avatar
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

#10 Post by Eugene Lutsenko »

It's all good! Thank you very much. But only made specific reference to the fields (VerModClsIT->L2_mera) for the database:

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]}}
[/size]
Attachments
4138.jpg
4138.jpg (197.3 KiB) Viewed 15274 times

Post Reply