T100——改变字体、行、列的显示颜色

比如像这样，把有差异的字段颜色标红显示；

1，定义一个DYNAMIC ARRAY OF RECORD来存放字段的颜色配置（字段均为string类型），

比如DEFINE g_imaf_d_color DYNAMIC ARRAY OF RECORD；字段一一对应g_imaf_d的字段；

2，设置LET g_imaf_d_color[l_ac].xxxx= 'red' ；

3，在BEFORE DIALOG或BEFORE DISPLAY下（反正是在填充完显示前）CALL DIALOG.setCellAttributes(g_imaf_d_color)；

4，OK。

=====================================================================

另外，CALL cl_set_comp_font_color("oea01,oea04", "red") 这个函数可设置整列的字体颜色；

顏色種類有:BLACK,BLUE,CYAN,GREEN,MAGENTA,RED,WHITE,YELLOW.；

可以設定顏色的元件有EDIT,BUTTONEDIT,COMBOBOX,DATEEDIT,LABEL.

======================================================================

改变整行的背景色：

1，首先定义一个DYNAMIC ARRAY OF RECORD，对应多少列，如共13列内容即c01-c13；

DEFINE g_xccc_d_color   DYNAMIC ARRAY OF RECORD
                           c01   STRING,
                           c02   STRING,
                           c03   STRING,
                           c04   STRING,
                           c05   STRING,
                           c06   STRING,
                           c07   STRING,
                           c08   STRING,
                           c09   STRING,
                           c10   STRING,
                           c11   STRING,
                           c12   STRING,
                           c13   STRING
                        END RECORD

2，对指定的行进行“染色”

            #add-point:ui_dialog段before dialog
#插完栏位，对第1，22，34行设定蓝色底色
               LET g_current_page = 1
               LET g_xccc_d_color[1].c01 = 'blue reverse'
               LET g_xccc_d_color[1].c02 = 'blue reverse'
               LET g_xccc_d_color[1].c03 = 'blue reverse'
               LET g_xccc_d_color[1].c04 = 'blue reverse'
               LET g_xccc_d_color[1].c05 = 'blue reverse'
               LET g_xccc_d_color[1].c06 = 'blue reverse'
               LET g_xccc_d_color[1].c07 = 'blue reverse'
               LET g_xccc_d_color[1].c08 = 'blue reverse'
               LET g_xccc_d_color[1].c09 = 'blue reverse'
               LET g_xccc_d_color[1].c10 = 'blue reverse'
               LET g_xccc_d_color[1].c11 = 'blue reverse'
               LET g_xccc_d_color[1].c12 = 'blue reverse'
               LET g_xccc_d_color[1].c13 = 'blue reverse'
               LET g_xccc_d_color[22].c01 = 'blue reverse'
               LET g_xccc_d_color[22].c02 = 'blue reverse'
               LET g_xccc_d_color[22].c03 = 'blue reverse'
               LET g_xccc_d_color[22].c04 = 'blue reverse'
               LET g_xccc_d_color[22].c05 = 'blue reverse'
               LET g_xccc_d_color[22].c06 = 'blue reverse'
               LET g_xccc_d_color[22].c07 = 'blue reverse'
               LET g_xccc_d_color[22].c08 = 'blue reverse'
               LET g_xccc_d_color[22].c09 = 'blue reverse'
               LET g_xccc_d_color[22].c10 = 'blue reverse'
               LET g_xccc_d_color[22].c11 = 'blue reverse'
               LET g_xccc_d_color[22].c12 = 'blue reverse'
               LET g_xccc_d_color[22].c13 = 'blue reverse'
               LET g_xccc_d_color[34].c01 = 'blue reverse'
               LET g_xccc_d_color[34].c02 = 'blue reverse'
               LET g_xccc_d_color[34].c03 = 'blue reverse'
               LET g_xccc_d_color[34].c04 = 'blue reverse'
               LET g_xccc_d_color[34].c05 = 'blue reverse'
               LET g_xccc_d_color[34].c06 = 'blue reverse'
               LET g_xccc_d_color[34].c07 = 'blue reverse'
               LET g_xccc_d_color[34].c08 = 'blue reverse'
               LET g_xccc_d_color[34].c09 = 'blue reverse'
               LET g_xccc_d_color[34].c10 = 'blue reverse'
               LET g_xccc_d_color[34].c11 = 'blue reverse'
               LET g_xccc_d_color[34].c12 = 'blue reverse'
               LET g_xccc_d_color[34].c13 = 'blue reverse'            
               CALL DIALOG.setArrayAttributes("s_detail1",g_xccc_d_color)
            #end add-point

T100——改变字体、行、列的显示颜色

推荐阅读