Christoph Erdmann
[WD] Colors August 07, 2019 03:54PM |
Re: [WD] Colors August 07, 2019 05:39PM |
Admin Registered: 5 years ago Posts: 293 |
Re: [WD] Colors August 07, 2019 06:05PM |
Registered: 5 years ago Posts: 150 |
nRowSelected is int = CurrentSubscript() IF nRowSelected > 0 THEN SWITCH COL_JF_Status[nRowSelected] CASE "Active" MySelf[nRowSelected]..Color = DefaultColor CASE "Inactive" MySelf[nRowSelected]..Color = DarkRed CASE "Master" MySelf[nRowSelected]..Color = DarkBlue CASE "Archive" MySelf[nRowSelected]..Color = DarkGray END END
IF clJobList.m_sGrpName = "All" THEN BTN_Sales_Group..BackgroundImage = IMG_Def BTN_Sales_Group..Color = Black //Changes the text color ELSE BTN_Sales_Group..BackgroundImage = IMG_BTN_On BTN_Sales_Group..Color = White END
Re: [WD] Colors August 08, 2019 09:56PM |
Registered: 5 years ago Posts: 114 |
Christoph Erdmann
Re: [WD] Colors August 12, 2019 05:04PM |