{"id":143,"date":"2019-05-02T08:11:10","date_gmt":"2019-05-02T00:11:10","guid":{"rendered":"http:\/\/www.hefeiyu.com\/?p=143"},"modified":"2019-05-02T15:20:52","modified_gmt":"2019-05-02T07:20:52","slug":"dialog-setcellattributes%e6%96%b9%e6%b3%95","status":"publish","type":"post","link":"https:\/\/www.hefeiyu.com\/?p=143","title":{"rendered":"DIALOG.setCellAttributes\u65b9\u6cd5"},"content":{"rendered":"<div id=\"content_views\" class=\"htmledit_views\">\n<p><strong><span style=\"font-size: 18px; color: #000099;\">TPTOP ERP GP 3.0 \u6d4b\u8bd5<\/span><\/strong><\/p>\n<p><span style=\"font-size: 18px;\">\u3010DEMO\u6e90\u7801\u4e0b\u8f7d\uff1aGP5.2\u2014\u2014<\/span><a href=\"http:\/\/l7.yunpan.cn\/lk\/sVvENiMKxXQTE\" target=\"_blank\" rel=\"nofollow noopener noreferrer\"><span style=\"font-size: 18px;\">\u5355\u8eab\u9ad8\u4eae\u663e\u793ademo.rar<\/span><\/a><span style=\"font-size: 18px;\">\u3011<\/span><\/p>\n<p><span style=\"font-family: 'KaiTi_GB2312'; font-size: 18px; color: #006600;\">###################################################################<\/span><\/p>\n<p><span style=\"font-family: 'KaiTi_GB2312'; font-size: 18px; color: #006600;\"># \u8bf4\u660e\uff1a&lt;\u6b64\u7248\u672c\u65e0\u663e\u793a\u5355\u5143\u683c\u80cc\u666f\uff0c\u663e\u793a\u6574\u884c\u80cc\u666f&gt;<br \/>\n#\u00a0\u00a0\u00a0\u00a0\u00a0 1. \u672c\u7a0b\u5e8f\u5c55\u73b0\uff1a\u663e\u793a\u5355\u5143\u683c\u5185\u5b57\u4f53\u989c\u8272<br \/>\n#\u00a0\u00a0\u00a0\u00a0\u00a0 2. \u4e3b\u8981\u5e94\u7528\u4e86DIALOG.setCellAttributes\u65b9\u6cd5<\/span><\/p>\n<p><span style=\"font-family: 'KaiTi_GB2312'; font-size: 18px; color: #006600;\">##################################################################<\/span><\/p>\n<p><span style=\"font-family: 'KaiTi_GB2312'; font-size: 18px; color: #006600;\">\u9996\u5148\u770b\u6d4b\u8bd5\u6548\u679c\uff1a<\/span><\/p>\n<p><img decoding=\"async\" src=\"http:\/\/www.hefeiyu.com\/wp-content\/uploads\/2019\/05\/1352777017_9876.jpg\" alt=\"\" \/><\/p>\n<p><strong><span style=\"font-size: 18px; color: #000099;\">.per\u6587\u4ef6\uff1a<\/span><\/strong><\/p>\n<pre class=\"pure-highlightjs\"><code class=\"null\">SCHEMA FORMONLY\r\nLAYOUT\r\n  VBOX\r\n    GROUP group02 (TEXT=\"NEW\/w List\")\r\n      TABLE\r\n        {\r\n         edit1      edit2      edit3       edit4     \r\n        [edit1     |edit2     |edit3      |edit4     ]\r\n        [edit1     |edit2     |edit3      |edit4     ]\r\n        [edit1     |edit2     |edit3      |edit4     ]\r\n        [edit1     |edit2     |edit3      |edit4     ]\r\n        [edit1     |edit2     |edit3      |edit4     ]\r\n        [edit1     |edit2     |edit3      |edit4     ]\r\n        [edit1     |edit2     |edit3      |edit4     ]\r\n        [edit1     |edit2     |edit3      |edit4     ]\r\n        [edit1     |edit2     |edit3      |edit4     ]\r\n        [edit1     |edit2     |edit3      |edit4     ]\r\n        }\r\n      END --TABLE\r\n    END --GROUP\r\n    GROUP group03 (TEXT=\"W\/O List\")\r\n      TABLE\r\n        {\r\n         edit_1         edit_2         \r\n        [edit_1        |edit_2         ]\r\n        [edit_1        |edit_2         ]\r\n        [edit_1        |edit_2         ]\r\n        [edit_1        |edit_2         ]\r\n        [edit_1        |edit_2         ]\r\n        [edit_1        |edit_2         ]\r\n        [edit_1        |edit_2         ]\r\n        [edit_1        |edit_2         ]\r\n        [edit_1        |edit_2         ]\r\n        [edit_1        |edit_2         ]\r\n        }\r\n      END --TABLE\r\n    END --GROUP\r\n    GRID\r\n      {\r\n        ---------- Rows [cn2   ]-[cn3   ] ----------[btn1] [btn2]\r\n      }\r\n    END --GRID\r\n  END --VBOX\r\nEND --LAYOUT\r\n\r\nATTRIBUTES\r\n  BUTTON     btn1    : view, TEXT = 'View';\r\n  BUTTON     btn2    : head, TEXT = 'head';\r\n             edit1   = FORMONLY.edit1,NOENTRY;\r\n             edit2   = FORMONLY.edit2,NOENTRY;\r\n             edit3   = FORMONLY.edit3,NOENTRY;\r\n             edit4   = FORMONLY.edit4,NOENTRY;\r\n             edit_1  = FORMONLY.edit_1,NOENTRY;\r\n             edit_2  = FORMONLY.edit_2,NOENTRY;\r\n\r\n             cn2        = FORMONLY.cn2, NOENTRY ;\r\n             cn3        = FORMONLY.cn3, NOENTRY ;\r\nEND\r\nINSTRUCTIONS\r\nSCREEN RECORD s_table1[10](edit1,edit2,edit3,edit4)\r\nSCREEN RECORD s_table2[10](edit_1,edit_2)\r\nEND<\/code><\/pre>\n<p><strong><span style=\"font-size: 18px; color: #000099;\">.4gl\u6587\u4ef6<\/span><\/strong><\/p>\n<pre class=\"pure-highlightjs\"><code class=\"null\"># Prog. Version..: '3.10.06-07.03.05(00003)'     #\r\n# Pattern name...: csfxdemo.4gl\r\n# Descriptions...: Set display attributes for cells\r\n# Date &amp; Author..: 2012\/11\/13 BY FMX\r\n#\r\n##############################################################\r\n# \u8bf4\u660e\uff1a&lt;\u6b64\u7248\u672c\u65e0\u663e\u793a\u5355\u5143\u683c\u80cc\u666f\uff0c\u663e\u793a\u6574\u884c\u80cc\u666f&gt;\r\n#      1. \u672c\u7a0b\u5e8f\u5c55\u73b0\uff1a\u663e\u793a\u5355\u5143\u683c\u5185\u5b57\u4f53\u989c\u8272 \r\n#      2. \u4e3b\u8981\u5e94\u7528\u4e86DIALOG.setCellAttributes\u65b9\u6cd5\r\n##############################################################\r\n\r\nGLOBALS \"..\/..\/config\/top.global\"\r\n\r\nDEFINE g_table1 DYNAMIC ARRAY OF RECORD  #\u5355\u8eab\u6570\u7ec4\r\n           edit1  int,\r\n           edit2  STRING,\r\n           edit3  STRING,\r\n           edit4  STRING\r\n           END RECORD\r\n\r\nDEFINE g_table1_attr DYNAMIC ARRAY OF RECORD  #\u5c5e\u6027\u6570\u7ec4\uff0c\u540d\u79f0\u4e0e\u5355\u8eab\u6570\u7ec4\u4e00\u81f4\uff0c\u7c7b\u578b\u5b9a\u4e49\u4e3astring\r\n           edit1  STRING,\r\n           edit2  STRING,\r\n           edit3  STRING,\r\n           edit4  STRING\r\n           END RECORD\r\n\r\nDEFINE g_table2 DYNAMIC ARRAY OF RECORD\r\n           edit_1  int,\r\n           edit_2  STRING\r\n           END RECORD\r\n\r\nMAIN\r\n   DEFINE l_ac  INTEGER\r\n   \r\n   WHENEVER ERROR CALL cl_err_msg_log\r\n \r\n   LET g_prog=\"csfxdemo\"\r\n\r\n   IF (NOT cl_user()) THEN\r\n      EXIT PROGRAM\r\n   END IF\r\n\r\n   IF (NOT cl_setup(\"CSF\")) THEN\r\n      EXIT PROGRAM\r\n   END IF\r\n\r\n   OPEN WINDOW w1 WITH FORM \"csf\/42f\/csfxdemo\"\r\n          ATTRIBUTE (STYLE = g_win_style CLIPPED) \r\n\r\n          CALL cl_set_locale_frm_name(\"csfxdemo\")\r\n          CALL cl_ui_init()\r\n\r\n   CALL b_fill()\r\n   CLOSE WINDOW w1\r\nEND MAIN\r\n\r\n\r\nFUNCTION b_fill()\r\n   DEFINE i INTEGER\r\n   CALL g_table1.clear()\r\n   CALL g_table2.clear()\r\n   CALL g_table1_attr.clear()\r\n   FOR i=1 TO 10\r\n      CALL g_table1.appendElement()\r\n      LET g_table1[i].edit1 = i\r\n      LET g_table1[i].edit2 = \"\u6d4b\u8bd5 \" || i\r\n      LET g_table1[i].edit3 = \"DEMO \" || i\r\n      LET g_table1[i].edit4 = \"TIPTOP ERP GP3.0-- \" || i\r\n      \r\n      LET g_table2[i].edit_1 = i\r\n      LET g_table2[i].edit_2 = \"TIPTOP ERP GP3.0-- \" || i\r\n      CALL g_table1.appendElement()\r\n      IF i MOD 2 = 0 THEN\r\n         LET g_table1_attr[i].edit1 = \"red\"\r\n         LET g_table1_attr[i].edit2 = \"blue reverse\"\r\n         LET g_table1_attr[i].edit3 = \"red\"\r\n         LET g_table1_attr[i].edit4 = \"blue reverse\"\r\n      ELSE\r\n         LET g_table1_attr[i].edit1 = \"green\"\r\n         LET g_table1_attr[i].edit2 = \"magenta reverse\"\r\n         LET g_table1_attr[i].edit3 = \"green\"\r\n         LET g_table1_attr[i].edit4 = \"magenta reverse\"\r\n      END IF\r\n   END FOR\r\n\r\n   DISPLAY ARRAY g_table1 TO s_table1.*\r\n     BEFORE DISPLAY\r\n       CALL DIALOG.setCellAttributes(g_table1_attr)\r\n   END DISPLAY\r\n   \r\n   DISPLAY ARRAY g_table2 TO s_table2.*\r\n\r\nEND FUNCTION<\/code><\/pre>\n<p>&nbsp;<\/p>\n<p><span style=\"font-size: 18px; color: #cc0000;\"><strong>\u4e0a\u9762\u6d4b\u8bd5\u53ea\u662fGP3.0\u7684\u6548\u679c\uff0c<\/strong><\/span><\/p>\n<p><span style=\"font-size: 18px; color: #cc0000;\"><strong>\u5bf9\u4e8eGP5.20\u4ee5\u4e0a\u7248\u672c\u6709\u4e00\u4e2aDIALOG.setArrayAttributes\u65b9\u6cd5 \u8fd9\u4e2a\u53ef\u4ee5\u8bbe\u7f6e\u5f88\u591a\u3002<\/strong><\/span><\/p>\n<p><span style=\"font-size: 18px; color: #cc0000;\"><strong>\u770b\u4e00\u56fe\uff1a\u5355\u8eab\u8bed\u6cd5\u9ad8\u4eae\u663e\u793a<\/strong><\/span><\/p>\n<p><img decoding=\"async\" src=\"http:\/\/www.hefeiyu.com\/wp-content\/uploads\/2019\/05\/1352777501_4768.gif\" alt=\"\" \/><\/p>\n<p><span style=\"font-size: 18px; color: #cc0000;\"><strong>4gl\u4ee3\u7801\uff1a<\/strong><\/span><\/p>\n<pre class=\"pure-highlightjs\"><code class=\"null\">GLOBALS \"..\/..\/config\/top.global\"\r\n \r\nDEFINE g_table1 DYNAMIC ARRAY OF RECORD  #\u5355\u8eab\u6570\u7ec4\r\n           edit1  int,\r\n           edit2  STRING,\r\n           edit3  STRING,\r\n           edit4  STRING\r\n           END RECORD\r\n \r\nDEFINE g_table1_attr DYNAMIC ARRAY OF RECORD  #\u5c5e\u6027\u6570\u7ec4\uff0c\u540d\u79f0\u4e0e\u5355\u8eab\u6570\u7ec4\u4e00\u81f4\uff0c\u7c7b\u578b\u5b9a\u4e49\u4e3astring\r\n           edit1  STRING,\r\n           edit2  STRING,\r\n           edit3  STRING,\r\n           edit4  STRING\r\n           END RECORD\r\n \r\nDEFINE g_table2 DYNAMIC ARRAY OF RECORD\r\n           edit_1  int,\r\n           edit_2  STRING\r\n           END RECORD\r\n \r\nMAIN\r\n   DEFINE l_ac  INTEGER\r\n   \r\n \r\n   WHENEVER ERROR CALL cl_err_msg_log\r\n \r\n   LET g_prog=\"csfxdemo\"\r\n \r\n   IF (NOT cl_user()) THEN\r\n      EXIT PROGRAM\r\n   END IF\r\n \r\n   IF (NOT cl_setup(\"CSF\")) THEN\r\n      EXIT PROGRAM\r\n   END IF\r\n \r\n \r\n   OPEN WINDOW w1 WITH FORM \"csf\/42f\/csfxdemo\"\r\n          ATTRIBUTE (STYLE = g_win_style CLIPPED) \r\n \r\n          CALL cl_set_locale_frm_name(\"csfxdemo\")\r\n          CALL cl_ui_init()\r\n \r\n   \r\n   CALL b_fill()\r\n    DISPLAY ARRAY g_table1 TO s_table1.*\r\n      BEFORE DISPLAY\r\n        CALL DIALOG.setCellAttributes(g_table1_attr)\r\n    END DISPLAY\r\n    DISPLAY ARRAY g_table2 TO s_table2.*\r\n   \r\n  DIALOG ATTRIBUTES(UNBUFFERED=TRUE)\r\n      DISPLAY ARRAY g_table1 TO s_table1.*\r\n          BEFORE DISPLAY \r\n             CALL DIALOG.setArrayAttributes(\"s_table1\",g_table1_attr)    #\u53c2\u6570\uff1a\u5c4f\u5e55\u53d8\u91cf,\u5c5e\u6027\u6570\u7ec4\r\n \r\n      END DISPLAY\r\n      \r\n      DISPLAY ARRAY g_table2 TO s_table2.*\r\n  \r\n      END DISPLAY\r\n \r\n      ON ACTION CLOSE\r\n         EXIT DIALOG\r\n      ON ACTION exit\r\n         EXIT DIALOG\r\n   END DIALOG\r\n \r\n   CLOSE WINDOW w1\r\nEND MAIN\r\n \r\nFUNCTION b_fill()\r\n   DEFINE l_i  INTEGER\r\n \r\n   CALL g_table1.clear()\r\n   CALL g_table2.clear()\r\n   CALL g_table1_attr.clear()\r\n \r\n   FOR l_i = 1 TO 20\r\n      LET g_table1[l_i].edit1 = l_i\r\n      LET g_table1[l_i].edit2 = l_i\r\n      LET g_table1[l_i].edit3 = l_i\r\n      LET g_table1[l_i].edit4 = l_i\r\n      \r\n      LET g_table2[l_i].edit_1 = l_i\r\n      LET g_table2[l_i].edit_2 = l_i\r\n   END FOR\r\n \r\n   LET g_table1[2].edit2 = \"\u663e\u793a\u5355\u5143\u683c\u5185\u5b57\u4f53\u989c\u8272\"\r\n   LET g_table1[3].edit2 = \"\u663e\u793a\u5355\u5143\u683c\u80cc\u666f\"\r\n   LET g_table1[4].edit2 = \"\u663e\u793a\u6574\u884c\u80cc\u666f\"\r\n \r\n \r\n   #\u5047\u8bbe\u6761\u4ef6\u8bbe\u5b9a \uff08\u5b9e\u9645\u5e94\u7528\u53ef\u4ee5\u653e\u5728\u4e0a\u9762\u5faa\u73af\u4e2d\u5904\u7406\uff09\r\n \r\n   #\u663e\u793a\u5355\u5143\u683c\u5185\u5b57\u4f53\u989c\u8272\r\n   LET g_table1_attr[2].edit1 = \"red\"    \r\n \r\n   #\u663e\u793a\u5355\u5143\u683c\u80cc\u666f\r\n   LET g_table1_attr[3].edit1 = \"red reverse\"   \r\n \r\n   #\u663e\u793a\u6574\u884c\u80cc\u666f\r\n   LET g_table1_attr[4].edit1 = \"yellow reverse\"  \r\n   LET g_table1_attr[4].edit2 = \"yellow reverse\"\r\n   LET g_table1_attr[4].edit3 = \"yellow reverse\"\r\n   LET g_table1_attr[4].edit4 = \"yellow reverse\"\r\n \r\nEND FUNCTION<\/code><\/pre>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<\/div>\n<p>\u8f6c\u8f7d\u8bf7\u6ce8\u660e\uff1a<a href=\"https:\/\/www.hefeiyu.com\">\u8d6b\u975e\u57df<\/a> &raquo; <a href=\"https:\/\/www.hefeiyu.com\/?p=143\">DIALOG.setCellAttributes\u65b9\u6cd5<\/a><\/p>","protected":false},"excerpt":{"rendered":"<p>TPTOP ERP GP 3.0 \u6d4b\u8bd5 \u3010DEMO\u6e90\u7801\u4e0b\u8f7d\uff1aGP5.2\u2014\u2014\u5355\u8eab\u9ad8\u4eae\u663e\u793ademo.rar\u3011 ################################################################### # \u8bf4\u660e [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[26],"tags":[60],"class_list":["post-143","post","type-post","status-publish","format-standard","hentry","category-4gl","tag-4gl"],"_links":{"self":[{"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=\/wp\/v2\/posts\/143","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=143"}],"version-history":[{"count":0,"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=\/wp\/v2\/posts\/143\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=143"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=143"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.hefeiyu.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=143"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}