-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathJamBrowser.dfm
More file actions
339 lines (339 loc) · 8.89 KB
/
Copy pathJamBrowser.dfm
File metadata and controls
339 lines (339 loc) · 8.89 KB
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
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
object JamBrowserFrm: TJamBrowserFrm
Left = 0
Top = 0
Caption = 'Jam Browser'
ClientHeight = 766
ClientWidth = 1198
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'Segoe UI'
Font.Style = []
KeyPreview = True
Position = poScreenCenter
ShowInTaskBar = True
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
OnShow = FormShow
TextHeight = 15
object SplitterLeft: TSplitter
Left = 310
Top = 40
Width = 4
Height = 684
ExplicitLeft = 256
ExplicitHeight = 532
end
object Splitter1: TSplitter
Left = 894
Top = 40
Width = 4
Height = 684
Align = alRight
ExplicitLeft = 620
ExplicitTop = -95
ExplicitHeight = 536
end
object SplitterFilmstrip: TSplitter
Left = 0
Top = 724
Width = 1198
Height = 4
Cursor = crVSplit
Align = alBottom
ExplicitLeft = -372
ExplicitTop = 437
ExplicitWidth = 996
end
object StatusBar1: TStatusBar
Left = 0
Top = 728
Width = 1198
Height = 38
Panels = <
item
Width = 300
end>
ExplicitTop = 711
ExplicitWidth = 1192
end
object PanelTop: TPanel
Left = 0
Top = 0
Width = 1198
Height = 40
Align = alTop
TabOrder = 0
ExplicitWidth = 1192
object jamLoading: TLabel
Left = 894
Top = 12
Width = 63
Height = 15
Caption = 'jamLoading'
Visible = False
end
object SliderThumbSize: TTrackBar
Left = 1
Top = 1
Width = 280
Height = 38
Align = alLeft
Max = 256
Min = 64
Position = 128
TabOrder = 0
OnChange = SliderThumbSizeChange
end
object ProgressBar: TProgressBar
Left = 314
Top = 8
Width = 574
Height = 26
Smooth = True
Step = 1
TabOrder = 1
Visible = False
StyleName = 'Windows'
end
object btnCancel: TButton
Left = 1112
Top = 9
Width = 75
Height = 25
Caption = 'Cancel'
TabOrder = 2
Visible = False
OnClick = btnCancelClick
end
end
object PanelFolders: TPanel
Left = 0
Top = 40
Width = 310
Height = 684
Align = alLeft
TabOrder = 1
ExplicitHeight = 667
object directoryTree: TVirtualDrawTree
Left = 1
Top = 1
Width = 308
Height = 682
Align = alClient
DefaultNodeHeight = 19
Header.AutoSizeIndex = 0
Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowSortGlyphs]
Images = SystemImages
TabOrder = 0
TreeOptions.AutoOptions = [toAutoScroll, toAutoScrollOnExpand, toAutoTristateTracking, toAutoHideButtons, toAutoDeleteMovedNodes, toAutoChangeScale]
TreeOptions.MiscOptions = [toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowRoot, toShowTreeLines, toThemeAware, toUseBlendedImages, toFullVertGridLines, toUseExplorerTheme]
TreeOptions.SelectionOptions = [toExtendedFocus, toFullRowSelect, toCenterScrollIntoView, toSelectNextNodeOnRemoval]
OnCompareNodes = directoryTreeCompareNodes
OnDrawNode = directoryTreeDrawNode
OnFocusChanged = directoryTreeFocusChanged
OnFreeNode = directoryTreeFreeNode
OnGetImageIndex = directoryTreeGetImageIndex
OnGetNodeWidth = directoryTreeGetNodeWidth
OnInitChildren = directoryTreeInitChildren
OnInitNode = directoryTreeInitNode
Touch.InteractiveGestures = [igPan, igPressAndTap]
Touch.InteractiveGestureOptions = [igoPanSingleFingerHorizontal, igoPanSingleFingerVertical, igoPanInertia, igoPanGutter, igoParentPassthrough]
Columns = <
item
Options = [coAllowClick, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible, coAutoSpring, coSmartResize, coAllowFocus, coEditable, coStyleColor]
Position = 0
Width = 308
end>
end
end
object PanelPreview: TPanel
Left = 898
Top = 40
Width = 300
Height = 684
Align = alRight
TabOrder = 2
ExplicitLeft = 892
ExplicitHeight = 667
object ImagePreview: TImage
Left = 1
Top = 1
Width = 298
Height = 312
Align = alTop
Center = True
Proportional = True
Stretch = True
end
object lblFilename: TLabel
Left = 6
Top = 334
Width = 59
Height = 15
Caption = 'File Name: '
Visible = False
end
object lblJamType: TLabel
Left = 6
Top = 355
Width = 54
Height = 15
Caption = 'JAM Type:'
Visible = False
end
object lblDimensions: TLabel
Left = 6
Top = 376
Width = 68
Height = 15
Caption = 'Dimensions: '
Visible = False
end
object lblTexs: TLabel
Left = 6
Top = 398
Width = 107
Height = 15
Caption = 'Number of Textures:'
Visible = False
end
object lblDateCreate: TLabel
Left = 6
Top = 419
Width = 71
Height = 15
Caption = 'Date Created:'
Visible = False
end
object lblDateModify: TLabel
Left = 6
Top = 440
Width = 78
Height = 15
Caption = 'Date Modified:'
Visible = False
end
object lblSize: TLabel
Left = 6
Top = 461
Width = 23
Height = 15
Caption = 'Size:'
Visible = False
end
end
object jamListView: TEasyListview
Left = 314
Top = 40
Width = 580
Height = 684
Align = alClient
CellSizes.ReportThumb.Height = 135
CellSizes.ReportThumb.Width = 112
CellSizes.Thumbnail.Height = 128
CellSizes.Thumbnail.Width = 128
EditManager.Font.Charset = DEFAULT_CHARSET
EditManager.Font.Color = clWindowText
EditManager.Font.Height = -12
EditManager.Font.Name = 'Segoe UI'
EditManager.Font.Style = []
DragManager.EnableDragImage = False
Header.Columns.Tag = 2
Header.Columns.Items = {
0600000004000000110000005445617379436F6C756D6E53746F726564FFFECE
0006000000800C00010101010000000001000181000000FFFFFF1F0001000000
01000000040000004E0061006D00650000000000000000000000000011000000
5445617379436F6C756D6E53746F726564FFFECE000600000080080001010101
0100000000000181000000FFFFFF1F0001000000010000000400000044006100
74006500000000000000000000000000110000005445617379436F6C756D6E53
746F726564FFFECE000600000080080001010101020000000000015B000000FF
FFFF1F00010000000100000004000000530069007A0065000000000000000000
00000000110000005445617379436F6C756D6E53746F726564FFFECE00060000
00810C00010101010300000000000181000000FFFFFF1F000100000001000000
120000004E0075006D0062006500720020006F00660020005400650078007400
7500720065007300000000000000000000000000}
Header.Height = 23
Header.Visible = True
PaintInfoGroup.MarginBottom.CaptionIndent = 4
PaintInfoItem.CheckFlat = True
PaintInfoItem.GridLines = True
PaintInfoItem.HorzGridLine = True
PaintInfoItem.VertGridLine = True
PaintInfoItem.ImageIndent = 10
PaintInfoItem.ShowBorder = False
PaintInfoItem.VAlignment = cvaBottom
PopupMenu = PopupMenu1
ShowThemedBorder = False
Sort.Algorithm = esaQuickSort
Sort.AutoSort = True
TabOrder = 3
View = elsThumbnail
OnItemCompare = jamListViewItemCompare
OnItemDblClick = jamListViewItemDblClick
OnItemFreeing = jamListViewItemFreeing
OnItemImageDraw = jamListViewItemImageDraw
OnItemImageDrawIsCustom = jamListViewItemImageDrawIsCustom
OnItemSelectionChanged = jamListViewItemSelectionChanged
end
object SystemImages: TImageList
Left = 164
Top = 316
end
object PopupMenu1: TPopupMenu
OnPopup = PopupMenu1Popup
Left = 592
Top = 392
object View1: TMenuItem
Caption = 'View'
object thumbnails1: TMenuItem
Caption = 'Thumbnails'
OnClick = thumbnails1Click
end
object Details1: TMenuItem
Caption = 'Details'
OnClick = Details1Click
end
end
object SortBy1: TMenuItem
Caption = 'Sort By'
object Name1: TMenuItem
Caption = 'Name'
Checked = True
OnClick = Name1Click
end
object Date1: TMenuItem
Caption = 'Date'
OnClick = Date1Click
end
object Size1: TMenuItem
Caption = 'Size'
OnClick = Size1Click
end
object NumberofTextures1: TMenuItem
Caption = 'Number of Textures'
OnClick = NumberofTextures1Click
end
object N2: TMenuItem
Caption = '-'
end
object Ascending1: TMenuItem
Caption = 'Ascending'
OnClick = Ascending1Click
end
object Descending1: TMenuItem
Caption = 'Descending'
OnClick = Descending1Click
end
end
object N1: TMenuItem
Caption = '-'
end
object AddtoBatch1: TMenuItem
Caption = 'Add to Batch Convert'
end
end
end