📄 gby_98.idlg
字号:
/*
gby_98.idlg Include for graphics by
**Special version for Windows95/98
*! VERSION 1.1.2 31mar2005
// SCRIPTS and PROGRAMS for external use
* SCRIPT gby_total_disable
* SCRIPT gby_missing_disable
* SCRIPT gby_setViewByopts
* SCRIPT gby_setViewByopts_Total
* SCRIPT gby_enable
* SCRIPT gby_disable
* PROGRAM gby_byopts_output
* PROGRAM gby_output
*/
DIALOG gby, tabtitle("By")
BEGIN
/* LEFT SIDE */
GROUPBOX gb_main _lft _top _gwd1 _ht17h, /*
*/ label("By controls ")
DEFINE ytop @y
/* LEFT SIDE-- By col(1) */
TEXT tx_vars _igft _ms _txwd ., /*
*/ label("Variables:") /*
*/ right
VARLIST vl_vars _txsep @ _txr2gi ., /*
*/ label("Variables:")
CHECKBOX ck_total @ _ms _txr2b4g ., /*
*/ label("Graph total") /*
*/ option(total)
DEFINE y @y
CHECKBOX ck_missing @ _ms 105 ., /*
*/ label("Graph missing") /*
*/ option(missing)
CHECKBOX ck_colfirst @ _ms _txr2b4g ., /*
*/ label("Column first") /*
*/ option(colfirst)
TEXT tx_holes _igft _ms _txwd ., /*
*/ label("Holes:") /*
*/ right
EDIT ed_holes _txsep @ _tcr2b4g ., /*
*/ label("Holes") /*
*/ option(holes)
BUTTON bu_holes _tcr2b4gsep @ _btwd ., /*
*/ label("?") /*
*/ onpush(view help numlist##|_new)
TEXT tx_layout _igft _ms _txwd ., /*
*/ label("Layout:") /*
*/ right
COMBOBOX cb_layout _txsep @ _txr2b4g ., /*
*/ dropdownlist /*
*/ label("Layout:") /*
*/ contents(gby_layout) values(gby_layout_values) /*
*/ onselchangelist(gby_layout_action)
TEXT tx_layoutsp _igft _ms _txwd ., /*
*/ right /*
*/ label("") /* use setlabel below */
SPINNER sp_rowcol _txsep @ _spwd ., /*
*/ min(1) max(100) default(1)
/* LEFT SIDE-- By col(2) */
TEXT tx_style _gft4_2 y _txwd ., /*
*/ label("Style:") /*
*/ right
COMBOBOX cb_style _txsep @ _txr2b4g ., /*
*/ label("Style:") /*
*/ dropdownlist /*
*/ contents(bygraph) /*
*/ option(style)
TEXT tx_imargin _gft4_2 _ms _txwd ., /*
*/ label("Margin:") /*
*/ right
COMBOBOX cb_imargin _txsep @ _txr2b4g ., /*
*/ label("Margin:") /*
*/ dropdown /*
*/ contents(margin) option(imargin)
TEXT tx_iscale _gft4_2 _ms _txwd ., /*
*/ label("Scale text:") /*
*/ right
EDIT ed_iscale _txsep @ _en7wd ., /*
*/ label("Scale text:") /*
*/ numonly /*
*/ option(iscale) /*
*/ default(1)
TEXT tx_xrescale _gft4_2 _ms _txwd ., /*
*/ label("X-Rescale:") /*
*/ right
COMBOBOX cb_xrescale _txsep @ _txr2b4g ., /*
*/ dropdownlist /*
*/ contents(yesno) values(gby_xrescale_values)
TEXT tx_yrescale _gft4_2 _ms _txwd ., /*
*/ label("Y-Rescale:") /*
*/ right
COMBOBOX cb_yrescale _txsep @ _txr2b4g ., /*
*/ dropdownlist /*
*/ contents(yesno) values(gby_yrescale_values)
/* LEFT SIDE LOWER Region options */
TEXT tx_space _lft _xxxls 0 0,
DEFINE y @y
/* Col(1) */
GROUPBOX gb_gregion _lft y _cwd4_g _ht6, /*
*/ label("Graph region ")
CHECKBOX ck_gregfclr _lft4_1gi _ss _txwd ., /*
*/ label("Color") /*
*/ clickon(gaction gby.cl_gregfclr.show) /*
*/ clickoff(gaction gby.cl_gregfclr.hide)
COLOR cl_gregfclr _txsep @ _txr4gi ., /*
*/ label("Color") /*
*/ option(color) /*
*/ default(255 0 0)
TEXT tx_gregmarg _lft4_1gi _ms _txwd ., /*
*/ label("Margin:") /*
*/ right
COMBOBOX cb_gregmarg _txsep @ _txr4gi ., /*
*/ contents(margin) dropdown option(margin)
/* Col(2) */
GROUPBOX gb_pregion _lft4_2g y _cwd4_g _ht6, /*
*/ label("Plot region ")
CHECKBOX ck_pregfclr _lft4_2gi _ss _txwd ., /*
*/ label("Color") /*
*/ clickon(gaction gby.cl_pregfclr.show) /*
*/ clickoff(gaction gby.cl_pregfclr.hide)
COLOR cl_pregfclr _txsep @ _txr4gi ., /*
*/ option(color)
TEXT tx_pregmarg _lft4_2gi _ms _txwd ., /*
*/ label("Margin:") /*
*/ right
COMBOBOX cb_pregmarg _txsep @ _txr4gi ., /*
*/ contents(margin) dropdown option(margin)
/**********************************************************************/
/* RIGHT SIDE */
/**********************************************************************/
/* Right Side Upper titles captions notes*/
GROUPBOX gb_title _lft2g ytop _gwd1 _ht10h, /*
*/ label("Title / Subtitle / Caption / Note ")
COMBOBOX cb_mode _igft2 _ss _tcr2b4g ., /*
*/ label("Title Mode") /*
*/ dropdownlist /*
*/ contents(gby_mode) /*
*/ onselchangelist(gby_mode_action)
TEXT tx_mode _tcr2b4gsep @ _txr2b4g ., /*
*/ label("")
TEXT tx_mark2 _igft2 _ls 0 0,
DEFINE rty @y
/**********************************************************************/
/* Right Side Upper Title col(1) */
TEXT tx_title _igft2 rty _txwd ., /*
*/ label("Title:") /*
*/ right
EDIT ed_title _txsep @ _txr2gi ., /*
*/ label("Title")
TEXT tx_ttlsize _igft2 _ms _txwd ., /*
*/ label("Size:") /*
*/ right
COMBOBOX cb_ttlsize _txsep @ _txr2b4g ., /*
*/ dropdownlist contents(textsizes) option(size)
DEFINE y @y
CHECKBOX ck_ttlclr _igft2 _ms _txwd ., /*
*/ label("Color") /*
*/ clickon(gaction gby.cl_ttlclr.show) /*
*/ clickoff(gaction gby.cl_ttlclr.hide)
COLOR cl_ttlclr _txsep @ _txr2b4g ., /*
*/ option(color)
TEXT tx_ttlmark _igft2 _ss 0 0,
DEFINE bxy @y
/* Right Side Upper Title col(2) */
TEXT tx_ttlgp _gft4_4 y _txwd ., /*
*/ label("Line gap:") /*
*/ right
EDIT ed_ttlgp _txsep @ _txr2b4g ., /*
*/ label("Line gap") /*
*/ option(linegap)
TEXT tx_ttlpos _gft4_4 _ms _txwd ., /*
*/ label("Position:") /*
*/ right
COMBOBOX cb_ttlpos _txsep @ _txr2b4g ., /*
*/ dropdownlist contents(clockpos) option(position)
/**********************************************************************/
/* Right Side Upper Subtitle col(1) */
TEXT tx_stitle _igft2 rty _txwd ., /*
*/ label("Subtitle:") /*
*/ right
EDIT ed_stitle _txsep @ _txr2gi ., /*
*/ label("Subtitle")
TEXT tx_stlsize _igft2 _ms _txwd ., /*
*/ label("Size:") /*
*/ right
COMBOBOX cb_stlsize _txsep @ _txr2b4g ., /*
*/ dropdownlist contents(textsizes) option(size)
DEFINE y @y
CHECKBOX ck_stlclr _igft2 _ms _txwd ., /*
*/ label("Color") /*
*/ clickon(gaction gby.cl_stlclr.show) /*
*/ clickoff(gaction gby.cl_stlclr.hide)
COLOR cl_stlclr _txsep @ _txr2b4g ., /*
*/ option(color)
TEXT tx_stlmark _igft2 _ss 0 0,
DEFINE bxy @y
/* Right Side Upper Subtitle col(2) */
TEXT tx_stlgp _gft4_4 y _txwd ., /*
*/ label("Line gap:") /*
*/ right
EDIT ed_stlgp _txsep @ _txr2b4g ., /*
*/ label("Line gap") /*
*/ option(linegap)
TEXT tx_stlpos _gft4_4 _ms _txwd ., /*
*/ label("Position:") /*
*/ right
COMBOBOX cb_stlpos _txsep @ _txr2b4g ., /*
*/ dropdownlist contents(clockpos) option(position)
/**********************************************************************/
/* Right Side Upper Caption col(1) */
TEXT tx_caption _igft2 rty _txwd ., /*
*/ label("Caption:") /*
*/ right
EDIT ed_caption _txsep @ _txr2gi ., /*
*/ label("Caption")
TEXT tx_capsize _igft2 _ms _txwd ., /*
*/ label("Size:") /*
*/ right
COMBOBOX cb_capsize _txsep @ _txr2b4g ., /*
*/ dropdownlist contents(textsizes) option(size)
DEFINE y @y
CHECKBOX ck_capclr _igft2 _ms _txwd ., /*
*/ label("Color") /*
*/ clickon(gaction gby.cl_capclr.show) /*
*/ clickoff(gaction gby.cl_capclr.hide)
COLOR cl_capclr _txsep @ _txr2b4g ., /*
*/ option(color)
TEXT tx_capmark _igft2 _ss 0 0,
DEFINE bxy @y
/* Right Side Upper Caption col(2) */
TEXT tx_capgp _gft4_4 y _txwd ., /*
*/ label("Line gap:") /*
*/ right
EDIT ed_capgp _txsep @ _txr2b4g ., /*
*/ label("Line gap") /*
*/ option(linegap)
TEXT tx_cappos _gft4_4 _ms _txwd ., /*
*/ label("Position:") /*
*/ right
COMBOBOX cb_cappos _txsep @ _txr2b4g ., /*
*/ dropdownlist contents(clockpos) option(position)
/**********************************************************************/
/* Right Side Upper Note col(1) */
TEXT tx_note _igft2 rty _txwd ., /*
*/ label("Note:") /*
*/ right
EDIT ed_note _txsep @ _txr2gi ., /*
*/ label("Note")
TEXT tx_notsize _igft2 _ms _txwd ., /*
*/ label("Size:") /*
*/ right
COMBOBOX cb_notsize _txsep @ _txr2b4g ., /*
*/ dropdownlist contents(textsizes) option(size)
DEFINE y @y
CHECKBOX ck_notclr _igft2 _ms _txwd ., /*
*/ label("Color") /*
*/ clickon(gaction gby.cl_notclr.show) /*
*/ clickoff(gaction gby.cl_notclr.hide)
COLOR cl_notclr _txsep @ _tcr2b4g ., /*
*/ option(color)
TEXT tx_notmark _igft2 _ss 0 0,
DEFINE bxy @y
/* Right Side Upper Note col(2) */
TEXT tx_notgp _gft4_4 y _txwd ., /*
*/ label("Line gap:") /*
*/ right
EDIT ed_notgp _txsep @ _txr2b4g ., /*
*/ label("Line gap") /*
*/ option(linegap)
TEXT tx_notpos _gft4_4 _ms _txwd ., /*
*/ label("Position:") /*
*/ right
COMBOBOX cb_notpos _txsep @ _txr2b4g ., /*
*/ dropdownlist contents(clockpos) option(position)
/**********************************************************************/
/**********************************************************************/
/* RIGHT SIDE LOWER Legend options */
GROUPBOX gb_legend _lft2g _xls _gwd1 _ht7h, /*
*/ label("Legend options ")
/* col(1) */
TEXT tx_legend _igft2 _ms _txwd ., /*
*/ label("Use legend:") /*
*/ right
DEFINE y @y
COMBOBOX cb_legend _txsep @ _txr2b4g ., /*
*/ dropdownlist /*
*/ contents(yesno) values(gby_legend_values) /*
*/ onselchangelist(gby_legend_action)
CHECKBOX ck_leghole @ _ms _txr2b4g ., /*
*/ label("Show in hole") /*
*/ clickon(script gby_leghole_on) /*
*/ clickoff(script gby_leghole_off)
CHECKBOX ck_legspan @ _ms 180 ., /*
*/ label("Span width of graph") /*
*/ option(span)
/* col(2) */
TEXT tx_legpos _gft4_4 y _txwd ., /*
*/ label("Position:") /*
*/ right
DEFINE y @y
COMBOBOX cb_legpos _txsep @ _txr2b4g ., /*
*/ dropdownlist contents(clockpos)
TEXT tx_leghole _gft4_4 _ms _txwd ., /*
*/ label("Hole:") /*
*/ right
EDIT ed_leghole _txsep @ _en7wd ., /*
*/ label("By legend hole:") /*
*/ numonly
END
SCRIPT gby_total_disable
BEGIN
gby.ck_total.disable
END
SCRIPT gby_missing_disable
BEGIN
gby.ck_missing.disable
END
SCRIPT gby_setViewByopts
BEGIN
gby.tx_vars.hide
gby.vl_vars.hide
gby.ck_total.hide
gby.ck_missing.hide
gby.ck_colfirst.setposition . 30
gby.tx_style.setposition . 30
gby.cb_style.setposition . 30
gby.tx_holes.setposition . 55
gby.ed_holes.setposition . 55
gby.bu_holes.setposition . 55
gby.tx_imargin.setposition . 55
gby.cb_imargin.setposition . 55
gby.tx_layout.setposition . 80
gby.cb_layout.setposition . 80
gby.tx_iscale.setposition . 80
gby.ed_iscale.setposition . 80
gby.tx_layoutsp.setposition . 105
gby.sp_rowcol.setposition . 105
gby.tx_xrescale.setposition . 105
gby.cb_xrescale.setposition . 105
gby.tx_yrescale.setposition . 130
gby.cb_yrescale.setposition . 130
END
SCRIPT gby_setViewByopts_Total
BEGIN
gby.tx_vars.hide
gby.vl_vars.hide
gby.ck_missing.hide
gby.ck_total.setposition . 30
gby.tx_style.setposition . 30
gby.cb_style.setposition . 30
gby.ck_colfirst.setposition . 55
gby.tx_imargin.setposition . 55
gby.cb_imargin.setposition . 55
gby.tx_holes.setposition . 80
gby.ed_holes.setposition . 80
gby.bu_holes.setposition . 80
gby.tx_iscale.setposition . 80
gby.ed_iscale.setposition . 80
gby.tx_layout.setposition . 105
gby.cb_layout.setposition . 105
gby.tx_xrescale.setposition . 105
gby.cb_xrescale.setposition . 105
gby.tx_layoutsp.setposition . 130
gby.sp_rowcol.setposition . 130
gby.tx_yrescale.setposition . 130
gby.cb_yrescale.setposition . 130
END
/* Begin Enable All */
SCRIPT gby_enable
BEGIN
program gby_enable_pr
END
PROGRAM gby_enable_pr
BEGIN
call gaction gby.gb_main.enable
call gaction gby.tx_vars.enable
call gaction gby.vl_vars.enable
call gaction gby.ck_total.enable
call gaction gby.ck_missing.enable
call gaction gby.ck_colfirst.enable
call gaction gby.tx_holes.enable
call gaction gby.ed_holes.enable
call gaction gby.bu_holes.enable
call gaction gby.tx_layout.enable
call gaction gby.cb_layout.enable
call gaction gby.tx_layoutsp.enable
call gaction gby.sp_rowcol.enable
call gaction gby.tx_style.enable
call gaction gby.cb_style.enable
call gaction gby.tx_imargin.enable
call gaction gby.cb_imargin.enable
call gaction gby.tx_iscale.enable
call gaction gby.ed_iscale.enable
call gaction gby.tx_xrescale.enable
call gaction gby.cb_xrescale.enable
call gaction gby.tx_yrescale.enable
call gaction gby.cb_yrescale.enable
/* Graph region options */
call gaction gby.gb_gregion.enable
call gaction gby.ck_gregfclr.enable
call gaction gby.cl_gregfclr.enable
call gaction gby.tx_gregmarg.enable
call gaction gby.cb_gregmarg.enable
/* Plot region options */
call gaction gby.gb_pregion.enable
call gaction gby.ck_pregfclr.enable
call gaction gby.cl_pregfclr.enable
call gaction gby.tx_pregmarg.enable
call gaction gby.cb_pregmarg.enable
/* Title Subtitle Caption Note options */
call gaction gby.gb_title.enable
call gaction gby.cb_mode.enable
call gaction gby.tx_mode.enable
/* Title options */
call gaction gby.tx_title.enable
call gaction gby.ed_title.enable
call gaction gby.tx_ttlsize.enable
call gaction gby.cb_ttlsize.enable
call gaction gby.ck_ttlclr.enable
call gaction gby.cl_ttlclr.enable
call gaction gby.tx_ttlpos.enable
call gaction gby.cb_ttlpos.enable
call gaction gby.tx_ttlgp.enable
call gaction gby.ed_ttlgp.enable
* Subtitle options */
call gaction gby.tx_stitle.enable
call gaction gby.ed_stitle.enable
call gaction gby.tx_stlsize.enable
call gaction gby.cb_stlsize.enable
call gaction gby.ck_stlclr.enable
call gaction gby.cl_stlclr.enable
call gaction gby.tx_stlpos.enable
call gaction gby.cb_stlpos.enable
call gaction gby.tx_stlgp.enable
call gaction gby.ed_stlgp.enable
/* Caption options */
call gaction gby.tx_caption.enable
call gaction gby.ed_caption.enable
call gaction gby.tx_capsize.enable
call gaction gby.cb_capsize.enable
call gaction gby.ck_capclr.enable
call gaction gby.cl_capclr.enable
call gaction gby.tx_cappos.enable
call gaction gby.cb_cappos.enable
call gaction gby.tx_capgp.enable
call gaction gby.ed_capgp.enable
/* Note options */
call gaction gby.tx_note.enable
call gaction gby.ed_note.enable
call gaction gby.tx_notsize.enable
call gaction gby.cb_notsize.enable
call gaction gby.ck_notclr.enable
call gaction gby.cl_notclr.enable
call gaction gby.tx_notpos.enable
call gaction gby.cb_notpos.enable
call gaction gby.tx_notgp.enable
call gaction gby.ed_notgp.enable
/* Legend options */
call gaction gby.gb_legend.enable
call gaction gby.tx_legend.enable
call gaction gby.cb_legend.enable
call gaction gby.cb_legend.withvalue gby.cb_legend.setvalue "@"
END
/* End Enable All */
/* Begin Disable All */
PROGRAM gby_disable
BEGIN
gby.gb_main.disable
gby.tx_vars.disable
gby.vl_vars.disable
gby.ck_total.disable
gby.ck_missing.disable
gby.ck_colfirst.disable
gby.tx_holes.disable
gby.ed_holes.disable
gby.bu_holes.disable
gby.tx_layout.disable
gby.cb_layout.disable
gby.tx_layoutsp.disable
gby.sp_rowcol.disable
gby.tx_style.disable
gby.cb_style.disable
gby.tx_imargin.disable
gby.cb_imargin.disable
gby.tx_iscale.disable
gby.ed_iscale.disable
gby.tx_xrescale.disable
gby.cb_xrescale.disable
gby.tx_yrescale.disable
gby.cb_yrescale.disable
/* Graph region options */
gby.gb_gregion.disable
gby.ck_gregfclr.disable
gby.cl_gregfclr.disable
gby.tx_gregmarg.disable
gby.cb_gregmarg.disable
/* Plot region options */
gby.gb_pregion.disable
gby.ck_pregfclr.disable
gby.cl_pregfclr.disable
gby.tx_pregmarg.disable
gby.cb_pregmarg.disable
/* Title Subtitle Caption Note options */
gby.gb_title.disable
gby.cb_mode.disable
gby.tx_mode.disable
/* Title options */
gby.tx_title.disable
gby.ed_title.disable
gby.tx_ttlsize.disable
gby.cb_ttlsize.disable
gby.ck_ttlclr.disable
gby.cl_ttlclr.disable
gby.tx_ttlpos.disable
gby.cb_ttlpos.disable
gby.tx_ttlgp.disable
gby.ed_ttlgp.disable
/* Subtitle options */
gby.tx_stitle.disable
gby.ed_stitle.disable
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -