genesis2000脚本GUI界面编写.doc

genesis2000脚本GUI界面编写下面就是Genesis的GUI的demo程序,从里面可以学到几乎全部的GUI的功能了.前面的变量设定的部份省略不讲,大家可以参考 Shell编程#!/bin/csh# This script is for GUI demo.#alias gui $GENESIS_DIR/e$GENESIS_VER/all/guialias gui_out echo !:* $GuiDefFilealias gui_lst cat !:* $GuiDefFilealias dogui gui $GuiDatFile; source $GuiDatFile; rm -f $GuiDefFile $GuiDatFileif ($?GENESIS_TMP) then set TMP = $GENESIS_TMPelse if ($?GENESIS_DIR) then set TMP = $GENESIS_DIR/tmpelse set TMP = /genesis/tmpendif# Set gui parametersset GuiDefFile = $TMP/GuiDefFile.$set GuiDatFile = $TMP/GuiDatFile.$# Set fonts for gui #设定字体 前三码表示字体格式,后两码数字表示大小 #格式三码h 表字型(可选t) b表字宽粗体(bold)(可选m,细体) r表字正(可选i 表斜体)set TitleFont = hbr18set NormFont = hbr14set HintFont = hbi14# Set colors for gui #颜色是用RGB的型式表示,可以用Genesis中OPTION下COLOR功能来选自己喜欢的, #然后设定到GUI中去 每一种颜色用两位数字表示 99表示最深00表示最浅 依次为R-red G-Green B-Blueset RedColor = 990000set WhiteColor = 999999set TitleColor = 772288set NormColor = 222299#set job_list = dbutil list jobs | awk print $1gui_out WIN 200 200 #确定GUI窗口左上角在屏幕中的位置gui_out BG $WhiteColor #BG background背景颜色gui_out LABEL /tmp/orblogo.xbm #添加标签(可以是一串字符,也可以是一个XPM格式图片我们在 #后面会讨论如果制作这种图片,在6.如何加入中文里有说明)gui_out BG $TitleColorgui_out FG $WhiteColor #FG font ground字体颜色gui_out LABEL GUI Demogui_out BG $NormColorgui_out TEXT user_name User name : #TEXT文字输入窗口,并将值传给user_name变量, 显示”User name”gui_out DTEXT user_name Beyond Li #设定文字窗口的初始值Default TEXT=DTEXT, 初始为Beyond Ligui_out BW 3 #BW 区隔线宽 BOLD Width 设为3gui_out FORM #表格开始gui_out LABEL Select Job -gui_out LIST StepJob 5 S 1 #LIST列表选择功能 StepJob为变量 5表示显示5行 S表示单选 #多选为M, 1表示显示时从第1个项目开始显示foreach JobName ($job_list) #这里将除了genesislib以外的所有料号名都显示于LIST列表中 if ($JobName != genesislib) then gui_out $JobName #列表的内容 endifendgui_out END #LIST功能结束 (LIST传回的值为具体的列表中的值)gui_out ENDFORM #表格结束gui_out BW 1gui_out OPTION pnl_size Panel size: #OPTION下拉选项功能 pnl_size为变量 显示”Panel size”gui_out 16x18 #选项的内容gui_out 18x24gui_out 20x24gui_out END #选项功能结束 (OPTION传回的值为项目内容具体的值如16x18等)gui_out RADIO sel_pnl Panel name method: H 1 $RedColor #RADIO点选功能 变量为 sel_pnl “ . ”为显示内容 #H表示水平显示 1表示一栏来显示 最后是颜色gui_out Default #供点选的内容gui_out Keyingui_out END #点选功能结束gui_out FORM sel_pnl 2 #表格开始 注意到后面有变量sel_pnl 2表示当sel_pnl选2时表格 #才显现出来否则将以阴影不可编辑或选择的方式来显示gui_out TEXT pnl_name Panel name:gui_out ENDFORMgui_out CLABEL OK #按钮功能 显示”OK”gui_out END #功能结束dogui #将这些传到GUI的程序中,它就会生成我们要的GUI界面.笔者通常在GUI最后,dogui之前加入一个RADIO让人员可以选择是否退出如下gui_out RADIO Exit_Chk Exit: H 1 $RedColor #RADIO点选功能 变量为 sel_pnl “ . ”为显示内容 #H表示水平显示 1表示一栏来显示 最后是颜色gui_out No #供点选的内容