-
Notifications
You must be signed in to change notification settings - Fork 3
/
Copy pathDirection.fmx
226 lines (226 loc) · 11 KB
/
Direction.fmx
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
inherited frmDirection: TfrmDirection
Caption = ''
DesignerMasterStyle = 0
inherited pnlMain: TPanel
object lblPosition: TLabel
Align = Scale
StyledSettings = [Family, Style, FontColor, Other]
Position.X = 2.000000000000000000
Position.Y = 500.000000000000000000
Size.Width = 535.000000000000000000
Size.Height = 60.000000000000000000
Size.PlatformDefault = False
StyleLookup = 'YellowLabelRectangleStyle'
TextSettings.Font.Size = 24.000000000000000000
TextSettings.HorzAlign = Center
TabOrder = 4
end
object btnNavigate: TButton
Align = Scale
Position.Y = 768.000000000000000000
Size.Width = 176.000000000000000000
Size.Height = 77.000000000000000000
Size.PlatformDefault = False
StyleLookup = 'LCARSButtonStyle'
TabOrder = 7
Text = 'Navigation'
OnClick = btnNavigateClick
end
object btnRoute: TButton
Align = Scale
Position.X = 364.000000000000000000
Position.Y = 768.000000000000000000
Size.Width = 176.000000000000000000
Size.Height = 77.000000000000000000
Size.PlatformDefault = False
StyleLookup = 'LCARSButtonStyle'
TabOrder = 5
Text = 'Show Route'
OnClick = btnRouteClick
end
object btnOffRoad: TButton
Align = Scale
Position.X = 180.000000000000000000
Position.Y = 768.000000000000000000
Size.Width = 180.000000000000000000
Size.Height = 77.000000000000000000
Size.PlatformDefault = False
StyleLookup = 'LCARSButtonStyle'
TabOrder = 6
Text = 'Off Road'
OnClick = btnOffRoadClick
end
object chkUsePrediction: TLabel
Align = Scale
StyledSettings = [Family, Size, Style, Other]
HitTest = True
Position.X = 128.000000000000000000
Position.Y = 704.000000000000000000
Size.Width = 233.000000000000000000
Size.Height = 54.000000000000000000
Size.PlatformDefault = False
StyleLookup = 'lCARSCheckButton'
TextSettings.FontColor = claWhite
Text = 'Use Prediction'
TabOrder = 8
OnClick = chkUsePredictionClick
end
object TMSFMXCompass1: TTMSFMXCompass
DisableFocusEffect = False
Position.X = 24.000000000000000000
Position.Y = 2.000000000000000000
StyleLookup = 'TMSFMXCompass1Style1'
Size.Width = 489.000000000000000000
Size.Height = 495.000000000000000000
Size.PlatformDefault = False
object StyleBook1: TStyleBook
Styles = <
item
ResourcesBin = {
464D585F5354594C4520322E35010614544D53464D58436F6D70617373315374
796C653103530A00545046300A5452656374616E676C6500095374796C654E61
6D650614544D53464D58436F6D70617373315374796C653105416C69676E0706
43656E7465720946696C6C2E4B696E6407044E6F6E650748697454657374080A
53697A652E576964746805000000000000408208400B53697A652E4865696768
7405000000000000C08108401453697A652E506C6174666F726D44656661756C
74080B5374726F6B652E4B696E6407044E6F6E65000F54544D53464D58506965
536861706500095374796C654E616D65060C6F75746572656C656D656E740541
6C69676E0706436C69656E740A53697A652E5769647468050000000000004082
08400B53697A652E48656967687405000000000000C08108401453697A652E50
6C6174666F726D44656661756C74080A46696C6C2E436F6C6F72070978464646
31444636460748697454657374080F5374726F6B65546869636B6E6573730500
00000000000080FF3F00000F54544D53464D5850696553686170650009537479
6C654E616D65060C696E6E6572656C656D656E7405416C69676E0706436C6965
6E740A53697A652E57696474680500000000000080FA07400B53697A652E4865
696768740500000000000080F907401453697A652E506C6174666F726D446566
61756C74080A46696C6C2E436F6C6F720708636C61426C61636B074869745465
7374080C4D617267696E732E4C6566740500000000000000A002400B4D617267
696E732E546F700500000000000000A002400D4D617267696E732E5269676874
0500000000000000A002400E4D617267696E732E426F74746F6D050000000000
0000A00240105374726F6B652E546869636B6E65737305000000000000000000
00000005545465787400095374796C654E616D65060B446973706C6179546578
7405416C69676E07055363616C650748697454657374080A506F736974696F6E
2E5905000000000021B0B607400A53697A652E57696474680500000000000040
8208400B53697A652E486569676874050000000000B072CB05401453697A652E
506C6174666F726D44656661756C7408045465787406032E2E2E165465787453
657474696E67732E466F6E742E53697A650500000000000000C004401A546578
7453657474696E67732E466F6E742E5374796C654578740A0D00000000070000
000000000004000000165465787453657474696E67732E466F6E74436F6C6F72
0709784646463144463646000005545465787400095374796C654E616D65060C
6469766973696F6E7465787405416C69676E07055363616C6507486974546573
74080A506F736974696F6E2E580500000000004C379A06400A506F736974696F
6E2E5905000000000018048908400A53697A652E5769647468050000000000DA
4EB506400B53697A652E486569676874050000000000002B8D04401453697A65
2E506C6174666F726D44656661756C74080454657874060D6469766973696F6E
2074657874165465787453657474696E67732E466F6E742E53697A6505000000
00000000A003401A5465787453657474696E67732E466F6E742E5374796C6545
78740A0D00000000070000000000000004000000165465787453657474696E67
732E466F6E74436F6C6F720709636C6159656C6C6F7716546578745365747469
6E67732E486F727A416C69676E07074C656164696E6700000554546578740009
5374796C654E616D65060F7375626469766973696F6E7465787405416C69676E
07055363616C650748697454657374080A506F736974696F6E2E580500000000
004C379A06400A506F736974696F6E2E59050000000000A65B9208400A53697A
652E5769647468050000000000DA4EB506400B53697A652E4865696768740500
00000000002B8D04401453697A652E506C6174666F726D44656661756C740804
5465787406107375626469766973696F6E207465787416546578745365747469
6E67732E466F6E742E53697A650500000000000000A003401A54657874536574
74696E67732E466F6E742E5374796C654578740A0D0000000007000000000000
0004000000165465787453657474696E67732E466F6E74436F6C6F720706636C
61526564165465787453657474696E67732E486F727A416C69676E07074C6561
64696E67000005544C696E6500095374796C654E616D6506086469766973696F
6E074869745465737408084C696E655479706507044C6566740A506F73697469
6F6E2E580500000000000000A806400A506F736974696F6E2E59050000000000
00008407400A53697A652E57696474680500000000000000F002400B53697A65
2E4865696768740500000000000000F002401453697A652E506C6174666F726D
44656661756C74080756697369626C6508000005544C696E6500095374796C65
4E616D65060B7375626469766973696F6E074869745465737408084C696E6554
79706507044C6566740A506F736974696F6E2E580500000000000000A806400A
506F736974696F6E2E5905000000000000808D07400A53697A652E5769647468
0500000000000000F002400B53697A652E4865696768740500000000000000F0
02401453697A652E506C6174666F726D44656661756C74080C5374726F6B652E
436F6C6F720709636C6153696C76657200000F54544D53464D58506965536861
706500095374796C654E616D6506126F7574657263656E746572656C656D656E
7405416C69676E07055363616C650A506F736974696F6E2E5805000000000067
66D006400A506F736974696F6E2E590500000000009999CF06400A53697A652E
57696474680500000000006666D005400B53697A652E48656967687405000000
00009A99CF05401453697A652E506C6174666F726D44656661756C74080A4669
6C6C2E436F6C6F7207097846464631444636460748697454657374080F537472
6F6B65546869636B6E657373050000000000000080FF3F001254544D53464D58
4E6565646C65536861706500095374796C654E616D6506066E6565646C651052
6F746174696F6E43656E7465722E59050000000000000080FF3F05416C69676E
07055363616C650A506F736974696F6E2E58050000000000490C9604400A506F
736974696F6E2E5905000000000095C3B806C00A53697A652E57696474680500
000000007268E903400B53697A652E48656967687405000000000070BDEE0640
1453697A652E506C6174666F726D44656661756C74080A46696C6C2E436F6C6F
720709784646463144463646074869745465737408105374726F6B652E546869
636B6E657373050000000000000000000000000F54544D53464D585069655368
61706500095374796C654E616D650612696E6E657263656E746572656C656D65
6E7405416C69676E07055363616C650A506F736974696F6E2E58050000000000
51B8A602400A506F736974696F6E2E590500000000007B14A602400A53697A65
2E576964746805000000000051B8A605400B53697A652E486569676874050000
0000007B14A605401453697A652E506C6174666F726D44656661756C74080A46
696C6C2E436F6C6F720708636C61426C61636B0748697454657374080F537472
6F6B65546869636B6E657373050000000000000080FF3F00000000}
end>
Left = 8
Top = 8
end
end
object lblDistance: TLabel
Align = Scale
StyledSettings = [Family, Style, FontColor, Other]
Position.X = 2.000000000000000000
Position.Y = 636.000000000000000000
Size.Width = 535.000000000000000000
Size.Height = 60.000000000000000000
Size.PlatformDefault = False
StyleLookup = 'YellowLabelRectangleStyle'
TextSettings.Font.Size = 24.000000000000000000
TextSettings.HorzAlign = Center
TabOrder = 2
end
object lblCompass: TLabel
Align = Scale
StyledSettings = [Family, Style, FontColor, Other]
Position.X = 2.000000000000000000
Position.Y = 704.000000000000000000
Size.Width = 111.000000000000000000
Size.Height = 54.000000000000000000
Size.PlatformDefault = False
StyleLookup = 'YellowLabelRectangleStyle'
TextSettings.Font.Size = 20.000000000000000000
TextSettings.HorzAlign = Center
TabOrder = 1
end
object lblMode: TLabel
Align = Scale
StyledSettings = [Family, Style, FontColor, Other]
Position.X = 376.000000000000000000
Position.Y = 704.000000000000000000
Size.Width = 161.000000000000000000
Size.Height = 54.000000000000000000
Size.PlatformDefault = False
StyleLookup = 'YellowLabelRectangleStyle'
TextSettings.Font.Size = 20.000000000000000000
TextSettings.HorzAlign = Center
TabOrder = 0
end
object lblAltitude: TLabel
Align = Scale
StyledSettings = [Family, Style, FontColor, Other]
Position.X = 2.000000000000000000
Position.Y = 568.000000000000000000
Size.Width = 535.000000000000000000
Size.Height = 60.000000000000000000
Size.PlatformDefault = False
StyleLookup = 'YellowLabelRectangleStyle'
TextSettings.Font.Size = 24.000000000000000000
TextSettings.HorzAlign = Center
TabOrder = 3
end
end
inherited tmrUpdates: TTimer
Left = 8
Top = 432
end
end