Subversion Repositories indexer_suite

Rev

Rev 2 | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2 Rev 3
1
object frmIndexCreator: TfrmIndexCreator
1
object frmIndexCreator: TfrmIndexCreator
2
  Left = 0
2
  Left = 0
3
  Top = 0
3
  Top = 0
4
  Caption = 'ViaThinkSoft Directory Hasher'
4
  Caption = 'ViaThinkSoft Directory Hasher'
5
  ClientHeight = 611
5
  ClientHeight = 611
6
  ClientWidth = 877
6
  ClientWidth = 884
7
  Color = clBtnFace
7
  Color = clBtnFace
8
  Font.Charset = DEFAULT_CHARSET
8
  Font.Charset = DEFAULT_CHARSET
9
  Font.Color = clWindowText
9
  Font.Color = clWindowText
10
  Font.Height = -11
10
  Font.Height = -11
11
  Font.Name = 'Tahoma'
11
  Font.Name = 'Tahoma'
12
  Font.Style = []
12
  Font.Style = []
13
  FormStyle = fsMDIChild
13
  FormStyle = fsMDIChild
14
  OldCreateOrder = False
14
  OldCreateOrder = False
15
  Position = poDefault
-
 
16
  Visible = True
15
  Visible = True
17
  OnClose = FormClose
16
  OnClose = FormClose
18
  OnShow = FormShow
17
  OnShow = FormShow
19
  DesignSize = (
18
  DesignSize = (
20
    877
19
    884
21
    611)
20
    611)
22
  PixelsPerInch = 96
21
  PixelsPerInch = 96
23
  TextHeight = 13
22
  TextHeight = 13
24
  object Label1: TLabel
23
  object Label1: TLabel
25
    Left = 24
24
    Left = 24
26
    Top = 279
25
    Top = 279
27
    Width = 827
26
    Width = 834
28
    Height = 13
27
    Height = 13
29
    Anchors = [akLeft, akTop, akRight]
28
    Anchors = [akLeft, akTop, akRight]
30
    AutoSize = False
29
    AutoSize = False
31
    Caption = 'Ready'
30
    Caption = 'Ready'
32
    ExplicitWidth = 465
31
    ExplicitWidth = 465
33
  end
32
  end
34
  object Label2: TLabel
33
  object Label2: TLabel
35
    Left = 24
34
    Left = 24
36
    Top = 298
35
    Top = 298
37
    Width = 113
36
    Width = 113
38
    Height = 13
37
    Height = 13
39
    Caption = 'Size of processed data:'
38
    Caption = 'Size of processed data:'
40
  end
39
  end
41
  object Label3: TLabel
40
  object Label3: TLabel
42
    Left = 24
41
    Left = 24
43
    Top = 317
42
    Top = 317
44
    Width = 111
43
    Width = 111
45
    Height = 13
44
    Height = 13
46
    Caption = 'Sum of processed files:'
45
    Caption = 'Sum of processed files:'
47
  end
46
  end
48
  object Label4: TLabel
47
  object Label4: TLabel
49
    Left = 24
48
    Left = 24
50
    Top = 336
49
    Top = 336
51
    Width = 47
50
    Width = 47
52
    Height = 13
51
    Height = 13
53
    Caption = 'New files:'
52
    Caption = 'New files:'
54
  end
53
  end
55
  object Label5: TLabel
54
  object Label5: TLabel
56
    Left = 160
55
    Left = 160
57
    Top = 297
56
    Top = 297
58
    Width = 6
57
    Width = 6
59
    Height = 13
58
    Height = 13
60
    Caption = '0'
59
    Caption = '0'
61
  end
60
  end
62
  object Label6: TLabel
61
  object Label6: TLabel
63
    Left = 160
62
    Left = 160
64
    Top = 316
63
    Top = 316
65
    Width = 6
64
    Width = 6
66
    Height = 13
65
    Height = 13
67
    Caption = '0'
66
    Caption = '0'
68
  end
67
  end
69
  object Label7: TLabel
68
  object Label7: TLabel
70
    Left = 160
69
    Left = 160
71
    Top = 335
70
    Top = 335
72
    Width = 6
71
    Width = 6
73
    Height = 13
72
    Height = 13
74
    Caption = '0'
73
    Caption = '0'
75
  end
74
  end
76
  object Label8: TLabel
75
  object Label8: TLabel
77
    Left = 24
76
    Left = 24
78
    Top = 355
77
    Top = 355
79
    Width = 67
78
    Width = 67
80
    Height = 13
79
    Height = 13
81
    Caption = 'Updated files:'
80
    Caption = 'Updated files:'
82
  end
81
  end
83
  object Label9: TLabel
82
  object Label9: TLabel
84
    Left = 160
83
    Left = 160
85
    Top = 355
84
    Top = 355
86
    Width = 6
85
    Width = 6
87
    Height = 13
86
    Height = 13
88
    Caption = '0'
87
    Caption = '0'
89
  end
88
  end
90
  object Label10: TLabel
89
  object Label10: TLabel
91
    Left = 24
90
    Left = 24
92
    Top = 374
91
    Top = 374
93
    Width = 33
92
    Width = 33
94
    Height = 13
93
    Height = 13
95
    Caption = 'Errors:'
94
    Caption = 'Errors:'
96
  end
95
  end
97
  object Label11: TLabel
96
  object Label11: TLabel
98
    Left = 160
97
    Left = 160
99
    Top = 374
98
    Top = 374
100
    Width = 6
99
    Width = 6
101
    Height = 13
100
    Height = 13
102
    Caption = '0'
101
    Caption = '0'
103
  end
102
  end
104
  object Label12: TLabel
103
  object Label12: TLabel
105
    Left = 160
104
    Left = 160
106
    Top = 393
105
    Top = 393
107
    Width = 6
106
    Width = 6
108
    Height = 13
107
    Height = 13
109
    Caption = '0'
108
    Caption = '0'
110
  end
109
  end
111
  object Label13: TLabel
110
  object Label13: TLabel
112
    Left = 24
111
    Left = 24
113
    Top = 393
112
    Top = 393
114
    Width = 41
113
    Width = 41
115
    Height = 13
114
    Height = 13
116
    Caption = 'Deleted:'
115
    Caption = 'Deleted:'
117
  end
116
  end
118
  object Label14: TLabel
117
  object Label14: TLabel
119
    Left = 584
118
    Left = 584
120
    Top = 8
119
    Top = 8
121
    Width = 53
120
    Width = 53
122
    Height = 13
121
    Height = 13
123
    Caption = 'Process list'
122
    Caption = 'Process list'
124
  end
123
  end
125
  object Button1: TButton
124
  object Button1: TButton
126
    Left = 320
125
    Left = 320
127
    Top = 185
126
    Top = 185
128
    Width = 169
127
    Width = 169
129
    Height = 33
128
    Height = 33
130
    Caption = 'Start'
129
    Caption = 'Start'
131
    Default = True
130
    Default = True
132
    TabOrder = 1
131
    TabOrder = 1
133
    OnClick = Button1Click
132
    OnClick = Button1Click
134
  end
133
  end
135
  object LabeledEdit2: TLabeledEdit
134
  object LabeledEdit2: TLabeledEdit
136
    Left = 24
135
    Left = 24
137
    Top = 56
136
    Top = 56
138
    Width = 273
137
    Width = 273
139
    Height = 21
138
    Height = 21
140
    EditLabel.Width = 113
139
    EditLabel.Width = 113
141
    EditLabel.Height = 13
140
    EditLabel.Height = 13
142
    EditLabel.Caption = 'Drive / Label to analyze'
141
    EditLabel.Caption = 'Drive / Label to analyze'
143
    PopupMenu = PopupMenu1
142
    PopupMenu = PopupMenu1
144
    TabOrder = 0
143
    TabOrder = 0
145
  end
144
  end
146
  object Button2: TButton
145
  object Button2: TButton
147
    Left = 320
146
    Left = 320
148
    Top = 224
147
    Top = 224
149
    Width = 169
148
    Width = 169
150
    Height = 33
149
    Height = 33
151
    Caption = 'Exit'
150
    Caption = 'Exit'
152
    TabOrder = 2
151
    TabOrder = 2
153
    OnClick = Button2Click
152
    OnClick = Button2Click
154
  end
153
  end
155
  object Memo1: TMemo
154
  object Memo1: TMemo
156
    Left = 584
155
    Left = 584
157
    Top = 25
156
    Top = 25
158
    Width = 283
157
    Width = 290
159
    Height = 193
158
    Height = 193
160
    Anchors = [akLeft, akTop, akRight]
159
    Anchors = [akLeft, akTop, akRight]
161
    ScrollBars = ssBoth
160
    ScrollBars = ssBoth
162
    TabOrder = 3
161
    TabOrder = 3
163
    WordWrap = False
162
    WordWrap = False
164
  end
163
  end
165
  object Button4: TButton
164
  object Button4: TButton
166
    Left = 778
165
    Left = 785
167
    Top = 224
166
    Top = 224
168
    Width = 89
167
    Width = 89
169
    Height = 33
168
    Height = 33
170
    Anchors = [akTop, akRight]
169
    Anchors = [akTop, akRight]
171
    Caption = 'Go'
170
    Caption = 'Go'
172
    TabOrder = 4
171
    TabOrder = 4
173
    OnClick = Button4Click
172
    OnClick = Button4Click
174
  end
173
  end
175
  object cbNoDelete: TCheckBox
174
  object cbNoDelete: TCheckBox
176
    Left = 320
175
    Left = 320
177
    Top = 128
176
    Top = 128
178
    Width = 241
177
    Width = 241
179
    Height = 17
178
    Height = 17
180
    Caption = 'Disable deleting/truncating of vanished data'
179
    Caption = 'Disable deleting/truncating of vanished data'
181
    TabOrder = 5
180
    TabOrder = 5
182
  end
181
  end
183
  object Memo2: TMemo
182
  object Memo2: TMemo
184
    Left = 24
183
    Left = 24
185
    Top = 440
184
    Top = 440
186
    Width = 843
185
    Width = 850
187
    Height = 156
186
    Height = 156
188
    Anchors = [akLeft, akTop, akRight, akBottom]
187
    Anchors = [akLeft, akTop, akRight, akBottom]
189
    Lines.Strings = (
188
    Lines.Strings = (
190
      'Log messages')
189
      'Log messages')
191
    ScrollBars = ssBoth
190
    ScrollBars = ssBoth
192
    TabOrder = 6
191
    TabOrder = 6
193
    WordWrap = False
192
    WordWrap = False
194
  end
193
  end
195
  object cbVerboseLogs: TCheckBox
194
  object cbVerboseLogs: TCheckBox
196
    Left = 772
195
    Left = 779
197
    Top = 417
196
    Top = 417
198
    Width = 97
197
    Width = 97
199
    Height = 17
198
    Height = 17
200
    Anchors = [akTop, akRight]
199
    Anchors = [akTop, akRight]
201
    Caption = 'Verbose logging'
200
    Caption = 'Verbose logging'
202
    TabOrder = 7
201
    TabOrder = 7
203
  end
202
  end
204
  object cbSimulate: TCheckBox
203
  object cbSimulate: TCheckBox
205
    Left = 320
204
    Left = 320
206
    Top = 151
205
    Top = 151
207
    Width = 97
206
    Width = 97
208
    Height = 17
207
    Height = 17
209
    Caption = 'Simulate'
208
    Caption = 'Simulate'
210
    TabOrder = 8
209
    TabOrder = 8
211
  end
210
  end
212
  object rgModus: TRadioGroup
211
  object rgModus: TRadioGroup
213
    Left = 320
212
    Left = 320
214
    Top = 9
213
    Top = 9
215
    Width = 185
214
    Width = 185
216
    Height = 105
215
    Height = 105
217
    Caption = 'Mode'
216
    Caption = 'Mode'
218
    ItemIndex = 0
217
    ItemIndex = 0
219
    Items.Strings = (
218
    Items.Strings = (
220
      'Update index'
219
      'Update index'
221
      'Completely re-create index'
220
      'Completely re-create index'
222
      'Verify checksums')
221
      'Verify checksums')
223
    TabOrder = 9
222
    TabOrder = 9
224
    OnClick = rgModusClick
223
    OnClick = rgModusClick
225
  end
224
  end
226
  object PopupMenu1: TPopupMenu
225
  object PopupMenu1: TPopupMenu
227
    Left = 272
226
    Left = 272
228
    Top = 80
227
    Top = 80
229
    object Copyuniquepathtoclipboard1: TMenuItem
228
    object Copyuniquepathtoclipboard1: TMenuItem
230
      Caption = 'Copy unique path to clipboard'
229
      Caption = 'Copy unique path to clipboard'
231
      OnClick = Copyuniquepathtoclipboard1Click
230
      OnClick = Copyuniquepathtoclipboard1Click
232
    end
231
    end
233
  end
232
  end
234
end
233
end