61
61
if TkWinfo.depth($root).to_i > 1
62
tagstyle_bold = {'background'=>'#43ce80', 'relief'=>'raised',
62
tagstyle_bold = {'background'=>'#43ce80', 'relief'=>'raised',
64
64
tagstyle_normal = {'background'=>'', 'relief'=>'flat'}
75
75
insert('end', "\n\n")
76
76
insert('end', '2. ��ñ�� 2�����Υץ��åȡ��ǡ�����ɽ������ư�������Ȥ��Ǥ��롣', (d2 = TkTextTag.new(t)) )
77
77
insert('end', "\n\n")
78
insert('end', '3. �ƥ����ȥ����ƥ�Υ����ȹ�·����',
78
insert('end', '3. �ƥ����ȥ����ƥ�Υ����ȹ�·����',
79
79
(d3 = TkTextTag.new(t)) )
80
80
insert('end', "\n\n")
81
insert('end', '4. �饤���ƥ�Τ���������Ƭ�η��Υ��ǥ�����',
81
insert('end', '4. �饤���ƥ�Τ���������Ƭ�η��Υ��ǥ�����',
82
82
(d4 = TkTextTag.new(t)) )
83
83
insert('end', "\n\n")
84
insert('end', '5. ���֥��ȥåפ��ѹ����뤿��ε�ǽ�Ĥ��Υ롼�顼��',
84
insert('end', '5. ���֥��ȥåפ��ѹ����뤿��ε�ǽ�Ĥ��Υ롼�顼��',
85
85
(d5 = TkTextTag.new(t)) )
86
86
insert('end', "\n\n")
88
'6. �����Х����ɤ���äƥ��������뤹��Τ�������åɡ�',
88
'6. �����Х����ɤ���äƥ��������뤹��Τ�������åɡ�',
89
89
(d6 = TkTextTag.new(t)) )
92
92
[d1, d2, d3, d4, d5, d6].each{|tag|
93
93
tag_binding_for_bind_demo(tag, tagstyle_bold, tagstyle_normal)
97
97
eval_samplecode(`cat #{[$demo_dir,'items.rb'].join(File::Separator)}`, 'items.rb')
101
101
eval_samplecode(`cat #{[$demo_dir,'plot.rb'].join(File::Separator)}`, 'plot.rb')
105
105
eval_samplecode(`cat #{[$demo_dir,'ctext.rb'].join(File::Separator)}`, 'ctext.rb')
109
109
eval_samplecode(`cat #{[$demo_dir,'arrow.rb'].join(File::Separator)}`, 'arrow.rb')
113
113
eval_samplecode(`cat #{[$demo_dir,'ruler.rb'].join(File::Separator)}`, 'ruler.rb')
117
117
eval_samplecode(`cat #{[$demo_dir,'cscroll.rb'].join(File::Separator)}`, 'cscroll.rb')