1. tiptop style file : /u1/topprod/tiptop/config/4st/tiptop.4st
新增/修改這裡的style,例如
<Style name="Window.echo02" >
<StyleAttribute name="startMenuPosition" value="menu" />
<StyleAttribute name="ringMenuPosition" value="right" />
<StyleAttribute name="toolBarPosition" value="top" />
<StyleAttribute name="actionPanelPosition" value="right" />
<StyleAttribute name="backgroundColor" value="lightCyan" />
</Style>
2. 修改lib/4gl/cl_setup.4gl
(因為程式OPEN WINDOW 時,都用g_win_style,本來cl_setup都是去抓zz_file.zz27,這裡把它半路攔截)
#20150630-1 BEGIN
IF g_plant = "ECHO01" THEN
LET g_win_style = "echo01"
END IF
IF g_plant = "ECHO02" THEN
LET g_win_style = "echo02"
END IF
IF g_plant = "ECHO03" THEN
LET g_win_style = "echo03"
END IF
#20150630-1 END
沒有留言:
張貼留言