blob: b95ac6d92244814edca8c1203c3750cd2340c49d (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
|
object VerseListForm: TVerseListForm
Left = 892
Top = 107
Width = 256
Height = 315
Caption = 'Verse List'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = True
Position = poScreenCenter
Scaled = False
ShowHint = True
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object plPreview: TPanel
Left = 0
Top = 143
Width = 248
Height = 145
Align = alBottom
Caption = 'plPreview'
TabOrder = 0
end
object ListBox1: TListBox
Left = 0
Top = 25
Width = 248
Height = 118
Align = alClient
ItemHeight = 13
TabOrder = 1
OnClick = ListBox1Click
OnDblClick = ListBox1DblClick
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 248
Height = 25
Align = alTop
BevelOuter = bvNone
TabOrder = 2
object SpeedButton1: TSpeedButton
Left = 64
Top = 2
Width = 23
Height = 22
Hint = 'Add Current Verse To List'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
3BB33773333773333773B333333B3333333B7333333733333337}
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 88
Top = 2
Width = 23
Height = 22
Hint = 'Remove Highlighted Entry From List'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
3333333337FFF7F3333333333000003333333333377777333333}
NumGlyphs = 2
OnClick = SpeedButton2Click
end
object SpeedButton3: TSpeedButton
Left = 164
Top = 2
Width = 23
Height = 22
Hint = 'Copy All Entries To Clipboard'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
93337FFFF7737777733300000033333333337777773333333333}
NumGlyphs = 2
OnClick = SpeedButton3Click
end
object SpeedButton4: TSpeedButton
Left = 188
Top = 2
Width = 23
Height = 22
Hint = 'Print All Entries'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
00033FFFFFFFFFFFFFFF0888888888888880777777777777777F088888888888
8880777777777777777F0000000000000000FFFFFFFFFFFFFFFF0F8F8F8F8F8F
8F80777777777777777F08F8F8F8F8F8F9F0777777777777777F0F8F8F8F8F8F
8F807777777777777F7F0000000000000000777777777777777F3330FFFFFFFF
03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
33333337F3FF7F3733333330F08F0F0333333337F7737F7333333330FFFF0033
33333337FFFF7733333333300000033333333337777773333333}
NumGlyphs = 2
OnClick = SpeedButton4Click
end
object SpeedButton5: TSpeedButton
Left = 24
Top = 2
Width = 23
Height = 22
Hint = 'Save Verse List To File'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
0003737FFFFFFFFF7F7330099999999900333777777777777733}
NumGlyphs = 2
OnClick = SpeedButton5Click
end
object SpeedButton6: TSpeedButton
Left = 0
Top = 2
Width = 23
Height = 22
Hint = 'Load Verse List From File'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555555555555555555555555555555
555555555555555555555555555555555555555FFFFFFFFFF555550000000000
55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
55555575FFF75555555555700007555555555557777555555555555555555555
5555555555555555555555555555555555555555555555555555}
NumGlyphs = 2
OnClick = SpeedButton6Click
end
end
object VLOpenDialog: TOpenDialog
DefaultExt = 'svl'
Filter = 'SWORD Verse Lists|*.SVL'
Title = 'Open Verse List'
Left = 144
Top = 164
end
object VLSaveDialog: TSaveDialog
DefaultExt = 'svl'
Filter = 'SWORD Verse Lists|*.SVL'
Title = 'Save Verse List'
Left = 184
Top = 163
end
end
|
