glegend_98.idlg

是一个经济学管理应用软件 很难找的 但是经济学学生又必须用到

/*
  glegend_98.idlg Include for graphics legends
  **Special version for Windows95/98

*!  VERSION 1.0.2  31mar2005

  This idlg assumes you are using _graph.idlg include and _std_graph.idlg
  include to set the proper lengths, widths and heights.
*/

DIALOG glegend, tabtitle("Legend")
BEGIN

  /* LEFT SIDE */
  GROUPBOX  gb_main    _lft        _top      _gwd1       _ht15,		/*
  		*/ label("Legend controls ")
  DEFINE    ytop @y
  /* LEFT SIDE-- Legend col(1) */
  TEXT     tx_legend   _igft       _ms       _txwd       .,		/*
  		*/ label("Use legend:") 				/*
		*/ right
  COMBOBOX cb_legend   _txsep      @         _txr2b4g    .,		/*
  		*/ dropdownlist						/*
  		*/ label("Use legend")					/*
  		*/ contents(yesno)					/*
  		*/ values(glegend_legend_values)			/*
  		*/ onselchangelist(glegend_legend_action)
  DEFINE   y @y
  TEXT     tx_colfirst _igft       _ms       _txwd       .,		/*
		*/ label("Col. first:") 				/*
		*/ right
  COMBOBOX cb_colfirst _txsep      @         _txr2b4g    .,		/*
		*/ dropdownlist						/*
		*/ label("Column first")				/*
		*/ contents(yesno)					/*
  		*/ values(glegend_colfirst_values)
  TEXT     tx_txfirst  _igft       _ms       _txwd       .,		/*
		*/ label("Text first:") 				/*
		*/ right
  COMBOBOX cb_txfirst  _txsep      @         _txr2b4g    .,		/*
		*/ dropdownlist						/*
		*/ label("Text first")					/*
		*/ contents(yesno)					/*
  		*/ values(glegend_txfirst_values)
  TEXT     tx_stack    _igft       _ms       _txwd       .,		/*
		*/ label("Stack:") 					/*
		*/ right
  COMBOBOX cb_stack    _txsep      @         _txr2b4g    .,		/*
		*/ dropdownlist						/*
		*/ label("Stack")					/*
		*/ contents(yesno)					/*
  		*/ values(glegend_stack_values)
  TEXT     tx_layout   _igft       _ms       _txwd       .,		/*
		*/ label("Layout:") 					/*
		*/ right
  COMBOBOX cb_layout   _txsep      @         _txr2b4g    .,		/*
		*/ dropdownlist						/*
		*/ label("Layout")					/*
		*/ contents(glegend_layout)				/*
		*/ onselchangelist(glegend_layout_action)		/*
  		*/ values(glegend_layout_values)
  TEXT     tx_layoutsp _igft       _ms       _txwd       .,		/*
  		*/ right						/*
  		*/ label("")  /* use setlabel below */
  SPINNER  sp_rownum   _txsep      @         _spwd       .,		/*
  		*/ label("Number of Rows")				/*
  		*/ min(1) max(100) default(1)
  SPINNER  sp_colnum   @           @         _spwd       .,		/*
  		*/ label("Number of Columns")				/*
  		*/ min(1) max(100) default(1)
  TEXT     tx_mark     @           +35       0           0,
  DEFINE   y2 @y

  /* LEFT SIDE-- Legend col(2) */
  TEXT     tx_sympl    _gft4_2     y         _txwd       .,		/*
		*/ label("Symbol:")					/*
		*/ right
  COMBOBOX cb_sympl    _txsep      @         _txr2b4g    .,		/*
  		*/ dropdownlist						/*
  		*/ contents(compass) 					/*
  		*/ option(symplacement)
  TEXT     tx_rowgp    _gft4_2     _ms       _txwd       .,		/*
		*/ label("Row gap:")					/*
		*/ right
  EDIT     ed_rowgp    _txsep      @         _txr2b4g    .,		/*
  		*/ label("Row gap")					/*
  		*/ option(rowgap)
  TEXT     tx_colgp    _gft4_2     _ms       _txwd       .,		/*
		*/ label("Col. gap:")					/*
		*/ right
  EDIT     ed_colgp    _txsep      @         _txr2b4g    .,		/*
  		*/ label("Column gap")					/*
  		*/ option(colgap)
  TEXT     tx_keygp    _gft4_2     _ms       _txwd       .,		/*
		*/ label("Key gap:")					/*
		*/ right
  EDIT     ed_keygp    _txsep      @         _txr2b4g    .,		/*
  		*/ label("Key gap")					/*
		*/ option(keygap)

  /* LEFT SIDE lower box */
  GROUPBOX  gb_region  _lft        y2        _gwd1       _ht10,		/*
  		*/ label("Region options ")
  /* LEFT SIDE-- Region col(1) */
  CHECKBOX ck_rclr     _igft       _ss       _txwd       .,		/*
  		*/ label("Color") 					/*
  		*/ clickon(gaction glegend.cl_rclr.show)		/*
  		*/ clickoff(gaction glegend.cl_rclr.hide)
  DEFINE   y @y
  COLOR    cl_rclr   _txsep      @         _txr2b4g      .,		/*
		*/ option(color)
  TEXT     tx_rpos     _igft       _ms       _txwd       .,		/*
		*/ label("Position:") 					/*
		*/ right
  COMBOBOX cb_rpos     _txsep      @         _txr2b4g    .,		/*
		*/ dropdownlist						/*
		*/ contents(clockpos) 					/*
		*/ option(position)
  CHECKBOX ck_ring     @           _ms       _txr2gi     .,             /*
  		*/ label("Inside plot region")				/*
		*/ clickon(program glegend_ring_check)			/*
                */ clickoff(program glegend_ring_check)			/*
                */ option(ring(0))
  CHECKBOX ck_span     @           _ms       _txr2gi     .,             /*
  		*/ label("Span width of graph")				/*
		*/ clickon(program glegend_span_check)			/*
		*/ clickoff(program glegend_span_check)			/*
		*/ option(span)
  DEFINE temp @y
  /* LEFT SIDE-- Region col(2) */
  TEXT     tx_rmargin  _gft4_2     y         _txwd       .,		/*
		*/ label("Margin:")					/*
		*/ right
  COMBOBOX cb_rmargin  _txsep      @         _txr2b4g    .,		/*
  		*/ dropdown						/*
  		*/ contents(margin) 					/*
  		*/ option(margin)

  /**********************************************************************/
  /* RIGHT SIDE */
  /**********************************************************************/
  /* Right Side Upper titles captions notes*/
  GROUPBOX gb_title    _lft2g      ytop     _gwd1       _ht13,		/*
  		*/ label("Title / Subtitle / Caption / Note ")
  COMBOBOX cb_mode     _igft2      _ss       _tcr2b4g    .,		/*
  		*/ label("Title Mode")					/*
  		*/ dropdownlist						/*
  		*/ contents(glegend_mode)				/*
  		*/ onselchangelist(glegend_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 glegend.cl_ttlclr.show)		/*
		*/ clickoff(gaction glegend.cl_ttlclr.hide)
  COLOR    cl_ttlclr   _txsep      @         _txr2b4g    .,		/*
		*/ option(color)
  TEXT     tx_ttlpos   _igft2      _ms       _txwd       .,		/*
		*/ label("Position:")					/*
		*/ right
  COMBOBOX cb_ttlpos   _txsep      @         _txr2b4g    .,		/*
		*/ dropdownlist						/*
		*/ contents(clockpos) 					/*
		*/ option(position)
  TEXT     tx_ttlmark  _igft2      _ss       0           0,
  /* Right Side Upper Title col(2) */
  TEXT     tx_ttlmrgn  _gft4_4     y         _txwd       .,		/*
		*/ label("Margin:")					/*
		*/ right
  COMBOBOX cb_ttlmrgn  _txsep      @         _txr2b4g    .,		/*
		*/ dropdown						/*
		*/ contents(margin) 					/*
		*/ option(margin)
  TEXT     tx_ttlgp    _gft4_4     _ms       _txwd       .,		/*
		*/ label("Line gap:")					/*
		*/ right
  EDIT     ed_ttlgp    _txsep      @         _txr2b4g    .,		/*
  		*/ label("Line gap")					/*
		*/ option(linegap)

  /**********************************************************************/
  /* 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 glegend.cl_stlclr.show)		/*
		*/ clickoff(gaction glegend.cl_stlclr.hide)
  COLOR    cl_stlclr   _txsep      @         _txr2b4g    .,		/*
		*/ option(color)
  TEXT     tx_stlpos   _igft2      _ms       _txwd       .,		/*
		*/ label("Position:")					/*
		*/ right
  COMBOBOX cb_stlpos   _txsep      @         _txr2b4g    .,		/*
		*/ dropdownlist						/*
		*/ contents(clockpos) 					/*
		*/ option(position)
  TEXT     tx_stlmark  _igft2      _ss       0           0,
  /* Right Side Upper Subtitle col(2) */
  TEXT     tx_stlmrgn  _gft4_4     y         _txwd       .,		/*
		*/ label("Margin:")					/*
		*/ right
  COMBOBOX cb_stlmrgn  _txsep      @         _txr2b4g    .,		/*
		*/ dropdown						/*
		*/ contents(margin) 					/*
		*/ option(margin)
  TEXT     tx_stlgp    _gft4_4     _ms       _txwd       .,		/*
		*/ label("Line gap:")					/*
		*/ right
  EDIT     ed_stlgp    _txsep      @         _txr2b4g    .,		/*
  		*/ label("Line gap")					/*
		*/ option(linegap)

  /**********************************************************************/
  /* 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 glegend.cl_capclr.show)		/*
		*/ clickoff(gaction glegend.cl_capclr.hide)
  COLOR    cl_capclr   _txsep      @         _tcr2b4g    .,		/*
		*/ option(color)
  TEXT     tx_cappos   _igft2      _ms       _txwd       .,		/*
		*/ label("Position:")					/*
		*/ right
  COMBOBOX cb_cappos   _txsep      @         _txr2b4g    .,		/*
		*/ dropdownlist						/*
		*/ contents(clockpos) 					/*
		*/ option(position)
  TEXT     tx_capmark  _igft2      _ss       0           0,
  /* Right Side Upper Caption col(2) */
  TEXT     tx_capmrgn  _gft4_4     y         _txwd       .,		/*
		*/ label("Margin:")					/*
		*/ right
  COMBOBOX cb_capmrgn  _txsep      @         _txr2b4g    .,		/*
		*/ dropdown						/*
		*/ contents(margin) 					/*
		*/ option(margin)
  TEXT     tx_capgp    _gft4_4     _ms       _txwd       .,		/*
		*/ label("Line gap:")					/*
		*/ right
  EDIT     ed_capgp    _txsep      @         _txr2b4g    .,		/*
  		*/ label("Line gap")					/*
		*/ option(linegap)

  /**********************************************************************/
  /* 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 glegend.cl_notclr.show)		/*
		*/ clickoff(gaction glegend.cl_notclr.hide)
  COLOR    cl_notclr   _txsep      @         _txr2b4g    .,		/*
		*/ option(color)
  TEXT     tx_notpos   _igft2      _ms       _txwd       .,		/*
		*/ label("Position:")					/*
		*/ right
  COMBOBOX cb_notpos   _txsep      @         _txr2b4g    .,		/*
		*/ dropdownlist						/*
		*/ contents(clockpos) 					/*
		*/ option(position)
  TEXT     tx_notmark  _igft2      _xls      0           0,
  DEFINE   bxy @y
  /* Right Side Upper Note col(2) */
  TEXT     tx_notmrgn  _gft4_4     y         _txwd       .,		/*
		*/ label("Margin:")					/*
		*/ right
  COMBOBOX cb_notmrgn  _txsep      @         _txr2b4g    .,		/*
		*/ dropdown						/*
		*/ contents(margin) 					/*
		*/ option(margin)
  TEXT     tx_notgp    _gft4_4     _ms       _txwd       .,		/*
		*/ label("Line gap:")					/*
		*/ right
  EDIT     ed_notgp    _txsep      @         _txr2b4g    .,		/*
  		*/ label("Line gap")					/*
		*/ option(linegap)

  /**********************************************************************/
  /**********************************************************************/
  /* Right Side Lower label options*/
  GROUPBOX  gb_label   _lft2g      bxy       _gwd1       _ht7h,		/*
  		*/ label("Label options ")

  /* RIGHT SIDE-- Label col(1)*/
  TEXT     tx_lab_ord  _igft2      _ss       _txwd       .,		/*
    		*/ label("Labels")					/*
    		*/ right
  EDIT     ed_lab_ord  _txsep      @         _tcr2gi    .,		/*
    		*/ label("Labels")					/*
    		*/ option(order)
  BUTTON   bt_lab_ord  _tcr2gisep  @         _btwd       .,		/*
  		*/ label("?")						/*
  		*/ onpush(view help legend_order##|_new)
  TEXT     tx_lsize    _igft2      _ms       _txwd       .,		/*
		*/ label("Size:")					/*
		*/ right
  DEFINE   y @y
  COMBOBOX cb_lsize    _txsep      @         _txr2b4g    .,		/*
		*/ dropdownlist 					/*
		*/ contents(textsizes) 					/*
		*/ option(size)
  CHECKBOX ck_lclr     _igft2      _ms       _txwd       .,		/*
		*/ label("Color")					/*
		*/ clickon(gaction glegend.cl_lclr.show)		/*
		*/ clickoff(gaction glegend.cl_lclr.hide)
  COLOR    cl_lclr     _txsep      @         _txr2b4g    .,		/*
		*/ option(color)

END

LIST glegend_legend_values
BEGIN
	""