-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathApplicationView.xojo_code
More file actions
248 lines (224 loc) · 6.16 KB
/
Copy pathApplicationView.xojo_code
File metadata and controls
248 lines (224 loc) · 6.16 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
#tag IOSView
Begin iosView ApplicationView
BackButtonTitle = ""
Compatibility = ""
LargeTitleMode = "2"
Left = 0
NavigationBarVisible= False
TabIcon = ""
TabTitle = ""
Title = ""
Top = 0
Begin iOSButton Button1
AccessibilityHint= ""
AccessibilityLabel= ""
AutoLayout = Button1, 7, , 0, False, +1.00, 4, 1, 280, , True
AutoLayout = Button1, 9, <Parent>, 9, False, +1.00, 4, 1, 0, , True
AutoLayout = Button1, 8, , 0, False, +1.00, 4, 1, 30, , True
AutoLayout = Button1, 10, <Parent>, 10, False, +1.00, 4, 1, -142, , True
Caption = "Acivity Invisible "
Enabled = True
Height = 30.0
Left = 20
LockedInPosition= False
Scope = 2
TextColor = &c007AFF00
TextFont = ""
TextSize = 0
Top = 83
Visible = True
Width = 280.0
End
Begin iOSButton Button2
AccessibilityHint= ""
AccessibilityLabel= ""
AutoLayout = Button2, 1, <Parent>, 1, False, +1.00, 4, 1, 20, , True
AutoLayout = Button2, 7, , 0, False, +1.00, 4, 1, 280, , True
AutoLayout = Button2, 3, Button1, 4, False, +1.00, 4, 1, *kStdControlGapV, , True
AutoLayout = Button2, 8, , 0, False, +1.00, 4, 1, 30, , True
Caption = "Get Activity state"
Enabled = True
Height = 30.0
Left = 20
LockedInPosition= False
Scope = 2
TextColor = &c007AFF00
TextFont = ""
TextSize = 0
Top = 121
Visible = True
Width = 280.0
End
Begin iOSButton Button3
AccessibilityHint= ""
AccessibilityLabel= ""
AutoLayout = Button3, 1, Button2, 1, False, +1.00, 4, 1, 0, , True
AutoLayout = Button3, 7, , 0, False, +1.00, 4, 1, 280, , True
AutoLayout = Button3, 3, <Parent>, 3, False, +1.00, 4, 1, 202, , True
AutoLayout = Button3, 8, , 0, False, +1.00, 4, 1, 30, , True
Caption = "Idletimer Enabled"
Enabled = True
Height = 30.0
Left = 20
LockedInPosition= False
Scope = 2
TextColor = &c007AFF00
TextFont = ""
TextSize = 0
Top = 202
Visible = True
Width = 280.0
End
Begin iOSButton Button4
AccessibilityHint= ""
AccessibilityLabel= ""
AutoLayout = Button4, 1, Button3, 1, False, +1.00, 4, 1, 0, , True
AutoLayout = Button4, 7, , 0, False, +1.00, 4, 1, 280, , True
AutoLayout = Button4, 3, Button3, 4, False, +1.00, 4, 1, *kStdControlGapV, , True
AutoLayout = Button4, 8, , 0, False, +1.00, 4, 1, 30, , True
Caption = "Get Activity state"
Enabled = True
Height = 30.0
Left = 20
LockedInPosition= False
Scope = 2
TextColor = &c007AFF00
TextFont = ""
TextSize = 0
Top = 240
Visible = True
Width = 280.0
End
End
#tag EndIOSView
#tag WindowCode
#tag Event
Sub Activate()
End Sub
#tag EndEvent
#tag EndWindowCode
#tag Events Button1
#tag Event
Sub Action()
If Me.Caption = "Acivity Visible" Then
App.NetworkActivityVisible = False
Me.Caption = "Acivity Invisible"
Else
App.NetworkActivityVisible = True
Me.Caption = "Acivity Visible"
End If
End Sub
#tag EndEvent
#tag EndEvents
#tag Events Button2
#tag Event
Sub Action()
Const default_state = "Get Activity state: "
If App.NetworkActivityVisible = True Then
Me.Caption = default_state + "True"
Else
Me.Caption = default_state + "False"
End If
End Sub
#tag EndEvent
#tag EndEvents
#tag Events Button3
#tag Event
Sub Action()
If Me.Caption = "Idletimer Enabled" Then
App.IdleTimerActive = False
Me.Caption = "Idletimer Disabled"
Else
App.IdleTimerActive = True
Me.Caption = "Idletimer Enabled"
End If
End Sub
#tag EndEvent
#tag EndEvents
#tag Events Button4
#tag Event
Sub Action()
Const default_state = "Idletimer enabled: "
If App.IdleTimerActive = True Then
Me.Caption = default_state + "True"
Else
Me.Caption = default_state + "False"
End If
End Sub
#tag EndEvent
#tag EndEvents
#tag ViewBehavior
#tag ViewProperty
Name="Index"
Visible=true
Group="ID"
InitialValue="-2147483648"
Type="Integer"
#tag EndViewProperty
#tag ViewProperty
Name="Name"
Visible=true
Group="ID"
Type="String"
#tag EndViewProperty
#tag ViewProperty
Name="Super"
Visible=true
Group="ID"
Type="String"
#tag EndViewProperty
#tag ViewProperty
Name="Left"
Visible=true
Group="Position"
InitialValue="0"
Type="Integer"
#tag EndViewProperty
#tag ViewProperty
Name="Top"
Visible=true
Group="Position"
InitialValue="0"
Type="Integer"
#tag EndViewProperty
#tag ViewProperty
Name="BackButtonTitle"
Group="Behavior"
Type="Text"
EditorType="MultiLineEditor"
#tag EndViewProperty
#tag ViewProperty
Name="NavigationBarVisible"
Group="Behavior"
Type="Boolean"
#tag EndViewProperty
#tag ViewProperty
Name="TabIcon"
Group="Behavior"
Type="iOSImage"
#tag EndViewProperty
#tag ViewProperty
Name="TabTitle"
Group="Behavior"
Type="Text"
#tag EndViewProperty
#tag ViewProperty
Name="Title"
Group="Behavior"
Type="Text"
EditorType="MultiLineEditor"
#tag EndViewProperty
#tag ViewProperty
Name="LargeTitleMode"
Visible=true
Group="Behavior"
InitialValue="2"
Type="LargeTitleDisplayModes"
EditorType="Enum"
#tag EnumValues
"0 - Automatic"
"1 - Always"
"2 - Never"
#tag EndEnumValues
#tag EndViewProperty
#tag EndViewBehavior