-
Notifications
You must be signed in to change notification settings - Fork 0
/
Main.dfm
269 lines (269 loc) · 6.99 KB
/
Main.dfm
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
object FormMousePuff1: TFormMousePuff1
Left = 0
Top = 0
BorderIcons = [biSystemMenu]
BorderStyle = bsSingle
Caption = 'MousePuff (Hide Mouse Pointer)'
ClientHeight = 248
ClientWidth = 360
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
ShowHint = True
OnCreate = FormCreate
OnDestroy = FormDestroy
OnKeyDown = FormKeyDown
PixelsPerInch = 96
TextHeight = 13
object Label3: TLabel
Left = 128
Top = 13
Width = 102
Height = 13
Caption = 'Hide after idling (sec)'
end
object Label1: TLabel
Left = 259
Top = 70
Width = 36
Height = 13
Caption = '------->'
end
object pageControl1: TPageControl
Left = 8
Top = 65
Width = 287
Height = 152
ActivePage = tabsheetClass
TabOrder = 0
object tabsheetTitle: TTabSheet
Hint = 'Full or partial window title'
Caption = 'Window Title'
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object memoTitle: TMemo
Left = 0
Top = 0
Width = 279
Height = 124
Align = alClient
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
end
end
object tabsheetClass: TTabSheet
Caption = 'Window Class'
ImageIndex = 1
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object memoClass: TMemo
Left = 0
Top = 0
Width = 279
Height = 124
Align = alClient
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
end
end
object tabsheetExe: TTabSheet
Hint = 'Full or partial exe path'
Caption = 'Executable'
ImageIndex = 2
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object memoExe: TMemo
Left = 0
Top = 0
Width = 279
Height = 124
Align = alClient
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
end
end
end
object radioBtnGlobal: TRadioButton
Left = 12
Top = 12
Width = 105
Height = 18
Hint = 'Hide always'
Caption = 'Global'
Checked = True
TabOrder = 6
TabStop = True
OnClick = radioBtnGlobalClick
end
object radioBtnProgram: TRadioButton
Left = 12
Top = 38
Width = 105
Height = 21
Hint = 'Hide only when specific window is active'
Caption = 'Program Specific'
TabOrder = 7
OnClick = radioBtnGlobalClick
end
object udTimeout: TUpDown
Left = 285
Top = 10
Width = 16
Height = 21
Associate = editTimeout
Min = 1
Position = 3
TabOrder = 9
end
object editTimeout: TEdit
Left = 243
Top = 10
Width = 42
Height = 21
ReadOnly = True
TabOrder = 8
Text = '3'
OnChange = editTimeoutChange
end
object btnSpy: TButton
Left = 301
Top = 65
Width = 53
Height = 25
Hint = 'Determine title, class and executable of windows'
Caption = 'Spy...'
TabOrder = 1
OnClick = btnSpyClick
end
object btnHide: TButton
Left = 300
Top = 215
Width = 53
Height = 25
Hint = 'Hide (Esc)'
Caption = #8600' Hide '#8600
TabOrder = 3
OnClick = btnHideClick
end
object btnHelp: TButton
Left = 315
Top = 8
Width = 26
Height = 25
Hint = 'Help information (F1)'
Caption = '?'
TabOrder = 10
OnClick = btnHelpClick
end
object btnExit: TButton
Left = 301
Top = 163
Width = 53
Height = 25
Hint = 'Terminate program (Alt+F4)'
Caption = #215' Exit '#215
TabOrder = 2
OnClick = btnExitClick
end
object chkStartToTray: TCheckBox
Left = 151
Top = 223
Width = 134
Height = 17
Caption = 'Start minimized to tray'
TabOrder = 5
end
object chkEnabled: TCheckBox
Left = 133
Top = 39
Width = 124
Height = 17
Hint = 'Deactivate program function'
Caption = 'Enabled (Ctrl+E)'
Checked = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
State = cbChecked
TabOrder = 11
OnClick = chkEnabledClick
end
object chkHideTrayIcon: TCheckBox
Left = 32
Top = 223
Width = 97
Height = 17
Hint = 'Hint: In case of completely hidden, run program again to show'
Caption = 'Hide tray icon'
TabOrder = 4
OnClick = chkHideTrayIconClick
end
object timerPuff: TTimer
Enabled = False
OnTimer = timerPuffTimer
Left = 80
Top = 116
end
object trayIcon: TTrayIcon
Hint = 'MousePuff (Hide Mouse Pointer)'
Icon.Data = {
0000010001002020100000000000E80200001600000028000000200000004000
0000010004000000000080020000000000000000000000000000000000000000
000000008000008000000080800080000000800080008080000080808000C0C0
C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF004444
4444444444444444444444444444444444444444444444444444444444444444
4444444444444444444444444444444444444444444444444444444444444444
4444444444444444444444444444444444444444444884444444444444444444
444444444448F4444444444444444444444444444448F4444444444444444444
4444444444487444444444444444444444444444444884444444444444444444
444444444448F7444444444444444444444444444447FF744444444444444444
444444444444FFF844444444444444444444444444448FFF4444444444444444
4444444444447FFF844444444444444444444444474448FFF444444444444444
444444447F74448FF744444444444444444444448F844447F744444444444444
44444448FFF8444484444444444444444444447F88FF84778444444444444444
44444787448FFFF774444444444444444444477F8448FF874444444444444444
44444478877477444444444444444444444444777F4444444444444444444444
4444444788444444444444444444444444444444884444444444444444444444
4444444478444444444444444444444444444444477444444444444444444444
4444444447744444444444444444444444444444447444444444444444444444
4444444444444444444444444444444444444444444444444444444444440000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000000}
OnClick = trayIconClick
Left = 36
Top = 116
end
object timerKb: TTimer
Enabled = False
Interval = 300
OnTimer = timerKbTimer
Left = 126
Top = 115
end
object timerResetHook: TTimer
Enabled = False
Interval = 500
OnTimer = timerResetHookTimer
Left = 188
Top = 113
end
end