-
Notifications
You must be signed in to change notification settings - Fork 7
/
Copy pathfrmFaceWindow.dfm
188 lines (188 loc) · 4.15 KB
/
frmFaceWindow.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
object frmFaceDetection: TfrmFaceDetection
Left = 0
Top = 0
Caption = 'Face Detection'
ClientHeight = 342
ClientWidth = 686
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Menu = mmMainMenu
OnCreate = FormCreate
OnDestroy = FormDestroy
TextHeight = 13
object Label1: TLabel
Left = 40
Top = 16
Width = 112
Height = 13
Caption = 'Photo URL with Face(s)'
end
object edtImageURL: TEdit
Left = 32
Top = 40
Width = 513
Height = 21
TabOrder = 0
end
object btnDetectFaces: TButton
Left = 568
Top = 38
Width = 83
Height = 25
Caption = 'Detect Faces'
TabOrder = 1
OnClick = btnDetectFacesClick
end
object PageControl1: TPageControl
Left = 0
Top = 96
Width = 686
Height = 246
ActivePage = tsResults
Align = alBottom
Anchors = [akLeft, akTop, akRight, akBottom]
TabOrder = 2
ExplicitWidth = 682
ExplicitHeight = 245
object tsOriginalPhoto: TTabSheet
Caption = 'Original Photo'
object imgOriginal: TImage
Left = 0
Top = 0
Width = 678
Height = 218
Align = alClient
Proportional = True
Stretch = True
ExplicitLeft = 192
ExplicitTop = 80
ExplicitWidth = 105
ExplicitHeight = 105
end
end
object tsDetectedPhoto: TTabSheet
Caption = 'Detected Photo'
ImageIndex = 1
object imgDetectedPhoto: TImage
Left = 0
Top = 0
Width = 678
Height = 218
Align = alClient
Proportional = True
Stretch = True
ExplicitLeft = 192
ExplicitTop = 80
ExplicitWidth = 105
ExplicitHeight = 105
end
end
object tsResults: TTabSheet
Caption = 'Results'
ImageIndex = 2
object mmoResults: TMemo
Left = 0
Top = 0
Width = 678
Height = 218
Align = alClient
Lines.Strings = (
'Memo1')
TabOrder = 0
ExplicitWidth = 674
ExplicitHeight = 217
end
end
end
object JvFilenameEdit1: TJvFilenameEdit
Left = 32
Top = 67
Width = 513
Height = 21
TabOrder = 3
Text = 'JvFilenameEdit1'
end
object btnDetectFacesFromLocalFile: TButton
Left = 568
Top = 65
Width = 83
Height = 25
Caption = 'Detect Faces'
TabOrder = 4
OnClick = btnDetectFacesFromLocalFileClick
end
object mmMainMenu: TMainMenu
Left = 600
Top = 192
object miFile: TMenuItem
Caption = '&File'
object New1: TMenuItem
Caption = '&New'
end
object Open1: TMenuItem
Caption = '&Open...'
end
object Save1: TMenuItem
Caption = '&Save'
end
object SaveAs1: TMenuItem
Caption = 'Save &As...'
end
object N2: TMenuItem
Caption = '-'
end
object Print1: TMenuItem
Caption = '&Print...'
end
object PrintSetup1: TMenuItem
Caption = 'P&rint Setup...'
end
object N1: TMenuItem
Caption = '-'
end
object miExit: TMenuItem
Caption = 'E&xit'
OnClick = miExitClick
end
end
object miFaceRecognitionEngine: TMenuItem
Caption = 'Face Recognition Engine'
object miGoogle: TMenuItem
Caption = 'Google'
GroupIndex = 10
RadioItem = True
OnClick = miSelectEngineClick
end
object miMicrosoft: TMenuItem
Caption = 'Microsoft'
GroupIndex = 10
RadioItem = True
OnClick = miSelectEngineClick
end
object miCodeProject: TMenuItem
Caption = 'Code Project'
GroupIndex = 10
RadioItem = True
OnClick = miSelectEngineClick
end
end
object miGoogleMenu: TMenuItem
Caption = 'Google'
object miGoogleLogin: TMenuItem
Caption = 'Login'
OnClick = miGoogleLoginClick
end
end
object miSettings: TMenuItem
Caption = 'Settings'
object miAPIKeys: TMenuItem
Caption = 'API Keys...'
OnClick = miAPIKeysClick
end
end
end
end