Context Navigation

umathgame.lfm

Last change on this file was 2, checked in by chronos, 5 years ago
Source code taken from https://svn.zdechov.net/PascalClassLibrary/GraphicTest/ rev 543.
File size: 17.1 KB

Line
1	object frmJuego: TfrmJuego
2	Left = 452
3	Height = 480
4	Top = 202
5	Width = 640
6	BorderStyle = bsDialog
7	Caption = 'Operaciones Matemáticas'
8	ClientHeight = 480
9	ClientWidth = 640
10	Constraints.MinHeight = 480
11	Constraints.MinWidth = 640
12	OnClose = FormClose
13	OnCreate = FormCreate
14	OnShow = FormShow
15	Position = poDesktopCenter
16	LCLVersion = '0.9.31'
17	object vsFondo: TBGRAVirtualScreen
18	Left = 0
19	Height = 480
20	Top = 0
21	Width = 640
22	OnRedraw = vsFondoRedraw
23	Align = alClient
24	Alignment = taLeftJustify
25	ClientHeight = 480
26	ClientWidth = 640
27	Color = clWhite
28	ParentColor = False
29	TabOrder = 0
30	object vsBarraEcuacion: TBGRAVirtualScreen
31	Left = 0
32	Height = 100
33	Top = 190
34	Width = 640
35	OnRedraw = vsBarraEcuacionRedraw
36	Alignment = taLeftJustify
37	Anchors = [akTop, akLeft, akRight]
38	ClientHeight = 100
39	ClientWidth = 640
40	Color = 15658734
41	ParentColor = False
42	TabOrder = 0
43	object btnVariable1: TBGRAImageButton
44	Left = 104
45	Height = 70
46	Top = 18
47	Width = 70
48	BitmapOptions.BorderWidth = 5
49	BitmapOptions.BorderHeight = 5
50	BitmapOptions.DrawMode = dmSet
51	BitmapOptions.ResampleMode = rmSimpleStretch
52	BitmapOptions.ResampleFilter = rfBestQuality
53	BitmapOptions.Enable = True
54	BitmapOptions.FillLeft = False
55	BitmapOptions.FillTop = False
56	BitmapOptions.FillRight = False
57	BitmapOptions.FillBottom = False
58	BitmapOptions.FillCenter = False
59	Caption = '-'
60	Enabled = False
61	Font.Color = clBlack
62	Font.Height = 18
63	ParentFont = False
64	Shadow.Alpha = 255
65	Shadow.Color = clBlack
66	Shadow.OffsetX = 1
67	Shadow.OffsetY = 1
68	Shadow.Visible = True
69	Shadow.Radius = 1
70	end
71	object btnOperador: TBGRAImageButton
72	Left = 196
73	Height = 70
74	Top = 18
75	Width = 70
76	BitmapOptions.BorderWidth = 5
77	BitmapOptions.BorderHeight = 5
78	BitmapOptions.DrawMode = dmSet
79	BitmapOptions.ResampleMode = rmSimpleStretch
80	BitmapOptions.ResampleFilter = rfBestQuality
81	BitmapOptions.Enable = True
82	BitmapOptions.FillLeft = False
83	BitmapOptions.FillTop = False
84	BitmapOptions.FillRight = False
85	BitmapOptions.FillBottom = False
86	BitmapOptions.FillCenter = False
87	Caption = '-'
88	Enabled = False
89	Font.Color = clBlack
90	Font.Height = 18
91	ParentFont = False
92	Shadow.Alpha = 255
93	Shadow.Color = clBlack
94	Shadow.OffsetX = 1
95	Shadow.OffsetY = 1
96	Shadow.Visible = True
97	Shadow.Radius = 1
98	end
99	object btnVariable2: TBGRAImageButton
100	Left = 288
101	Height = 70
102	Top = 18
103	Width = 70
104	BitmapOptions.BorderWidth = 5
105	BitmapOptions.BorderHeight = 5
106	BitmapOptions.DrawMode = dmSet
107	BitmapOptions.ResampleMode = rmSimpleStretch
108	BitmapOptions.ResampleFilter = rfBestQuality
109	BitmapOptions.Enable = True
110	BitmapOptions.FillLeft = False
111	BitmapOptions.FillTop = False
112	BitmapOptions.FillRight = False
113	BitmapOptions.FillBottom = False
114	BitmapOptions.FillCenter = False
115	Caption = '-'
116	Enabled = False
117	Font.Color = clBlack
118	Font.Height = 18
119	ParentFont = False
120	Shadow.Alpha = 255
121	Shadow.Color = clBlack
122	Shadow.OffsetX = 1
123	Shadow.OffsetY = 1
124	Shadow.Visible = True
125	Shadow.Radius = 1
126	end
127	object btnIgualdad: TBGRAImageButton
128	Left = 380
129	Height = 70
130	Top = 18
131	Width = 70
132	BitmapOptions.BorderWidth = 5
133	BitmapOptions.BorderHeight = 5
134	BitmapOptions.DrawMode = dmSet
135	BitmapOptions.ResampleMode = rmSimpleStretch
136	BitmapOptions.ResampleFilter = rfBestQuality
137	BitmapOptions.Enable = True
138	BitmapOptions.FillLeft = False
139	BitmapOptions.FillTop = False
140	BitmapOptions.FillRight = False
141	BitmapOptions.FillBottom = False
142	BitmapOptions.FillCenter = False
143	Caption = '='
144	Enabled = False
145	Font.Color = clBlack
146	Font.Height = 18
147	ParentFont = False
148	Shadow.Alpha = 255
149	Shadow.Color = clBlack
150	Shadow.OffsetX = 1
151	Shadow.OffsetY = 1
152	Shadow.Visible = True
153	Shadow.Radius = 1
154	end
155	object btnResultado: TBGRAImageButton
156	Left = 472
157	Height = 70
158	Top = 18
159	Width = 70
160	BitmapOptions.BorderWidth = 5
161	BitmapOptions.BorderHeight = 5
162	BitmapOptions.DrawMode = dmSet
163	BitmapOptions.ResampleMode = rmSimpleStretch
164	BitmapOptions.ResampleFilter = rfBestQuality
165	BitmapOptions.Enable = True
166	BitmapOptions.FillLeft = False
167	BitmapOptions.FillTop = False
168	BitmapOptions.FillRight = False
169	BitmapOptions.FillBottom = False
170	BitmapOptions.FillCenter = False
171	Caption = 'BGRAImageButton1'
172	Enabled = False
173	Font.Color = clBlack
174	Font.Height = 18
175	ParentFont = False
176	Shadow.Alpha = 255
177	Shadow.Color = clBlack
178	Shadow.OffsetX = 1
179	Shadow.OffsetY = 1
180	Shadow.Visible = True
181	Shadow.Radius = 1
182	end
183	end
184	object vsBarraOpciones: TBGRAVirtualScreen
185	Left = 0
186	Height = 74
187	Top = 344
188	Width = 640
189	OnRedraw = vsBarraOpcionesRedraw
190	Alignment = taLeftJustify
191	Anchors = [akTop, akLeft, akRight]
192	ClientHeight = 74
193	ClientWidth = 640
194	Color = 15658734
195	ParentColor = False
196	TabOrder = 1
197	object Opcion2: TBGRAImageButton
198	Left = 196
199	Height = 61
200	Hint = 'BitmapOptions 6px border.'
201	Top = 6
202	Width = 70
203	Anchors = [akTop, akLeft, akRight]
204	Animation = True
205	BitmapOptions.BorderWidth = 6
206	BitmapOptions.BorderHeight = 6
207	BitmapOptions.DrawMode = dmSet
208	BitmapOptions.ResampleMode = rmSimpleStretch
209	BitmapOptions.ResampleFilter = rfBestQuality
210	BitmapOptions.Enable = True
211	BitmapOptions.FillLeft = False
212	BitmapOptions.FillTop = False
213	BitmapOptions.FillRight = False
214	BitmapOptions.FillBottom = False
215	BitmapOptions.FillCenter = False
216	Caption = '0'
217	Font.Color = 5592405
218	Font.Height = 25
219	OnClick = Opcion2Click
220	ParentFont = False
221	Shadow.Alpha = 255
222	Shadow.Color = clWhite
223	Shadow.OffsetX = 0
224	Shadow.OffsetY = 1
225	Shadow.Visible = True
226	Shadow.Radius = 0
227	end
228	object Opcion3: TBGRAImageButton
229	Left = 288
230	Height = 61
231	Hint = 'BitmapOptions 6px border.'
232	Top = 6
233	Width = 70
234	Anchors = [akTop, akLeft, akRight]
235	Animation = True
236	BitmapOptions.BorderWidth = 6
237	BitmapOptions.BorderHeight = 6
238	BitmapOptions.DrawMode = dmSet
239	BitmapOptions.ResampleMode = rmSimpleStretch
240	BitmapOptions.ResampleFilter = rfBestQuality
241	BitmapOptions.Enable = True
242	BitmapOptions.FillLeft = False
243	BitmapOptions.FillTop = False
244	BitmapOptions.FillRight = False
245	BitmapOptions.FillBottom = False
246	BitmapOptions.FillCenter = False
247	Caption = '0'
248	Font.Color = 5592405
249	Font.Height = 25
250	OnClick = Opcion3Click
251	ParentFont = False
252	Shadow.Alpha = 255
253	Shadow.Color = clWhite
254	Shadow.OffsetX = 0
255	Shadow.OffsetY = 1
256	Shadow.Visible = True
257	Shadow.Radius = 0
258	end
259	object Opcion4: TBGRAImageButton
260	Left = 380
261	Height = 61
262	Hint = 'BitmapOptions 6px border.'
263	Top = 6
264	Width = 70
265	Anchors = [akTop, akLeft, akRight]
266	Animation = True
267	BitmapOptions.BorderWidth = 6
268	BitmapOptions.BorderHeight = 6
269	BitmapOptions.DrawMode = dmSet
270	BitmapOptions.ResampleMode = rmSimpleStretch
271	BitmapOptions.ResampleFilter = rfBestQuality
272	BitmapOptions.Enable = True
273	BitmapOptions.FillLeft = False
274	BitmapOptions.FillTop = False
275	BitmapOptions.FillRight = False
276	BitmapOptions.FillBottom = False
277	BitmapOptions.FillCenter = False
278	Caption = '0'
279	Font.Color = 5592405
280	Font.Height = 25
281	OnClick = Opcion4Click
282	ParentFont = False
283	Shadow.Alpha = 255
284	Shadow.Color = clWhite
285	Shadow.OffsetX = 0
286	Shadow.OffsetY = 1
287	Shadow.Visible = True
288	Shadow.Radius = 0
289	end
290	object Opcion5: TBGRAImageButton
291	Left = 472
292	Height = 61
293	Hint = 'BitmapOptions 6px border.'
294	Top = 6
295	Width = 70
296	Anchors = [akTop, akLeft, akRight]
297	Animation = True
298	BitmapOptions.BorderWidth = 6
299	BitmapOptions.BorderHeight = 6
300	BitmapOptions.DrawMode = dmSet
301	BitmapOptions.ResampleMode = rmSimpleStretch
302	BitmapOptions.ResampleFilter = rfBestQuality
303	BitmapOptions.Enable = True
304	BitmapOptions.FillLeft = False
305	BitmapOptions.FillTop = False
306	BitmapOptions.FillRight = False
307	BitmapOptions.FillBottom = False
308	BitmapOptions.FillCenter = False
309	Caption = '0'
310	Font.Color = 5592405
311	Font.Height = 25
312	OnClick = Opcion5Click
313	ParentFont = False
314	Shadow.Alpha = 255
315	Shadow.Color = clWhite
316	Shadow.OffsetX = 0
317	Shadow.OffsetY = 1
318	Shadow.Visible = True
319	Shadow.Radius = 0
320	end
321	object Opcion1: TBGRAImageButton
322	Left = 104
323	Height = 61
324	Top = 6
325	Width = 70
326	Anchors = [akTop, akLeft, akRight]
327	Animation = True
328	BitmapOptions.BorderWidth = 6
329	BitmapOptions.BorderHeight = 9
330	BitmapOptions.DrawMode = dmSet
331	BitmapOptions.ResampleMode = rmFineResample
332	BitmapOptions.ResampleFilter = rfBestQuality
333	BitmapOptions.Enable = True
334	BitmapOptions.FillLeft = False
335	BitmapOptions.FillTop = False
336	BitmapOptions.FillRight = False
337	BitmapOptions.FillBottom = False
338	BitmapOptions.FillCenter = False
339	Caption = '0'
340	Font.Color = 5592405
341	Font.Height = 25
342	OnClick = Opcion1Click
343	ParentFont = False
344	Shadow.Alpha = 255
345	Shadow.Color = clWhite
346	Shadow.OffsetX = 0
347	Shadow.OffsetY = 2
348	Shadow.Visible = True
349	Shadow.Radius = 1
350	end
351	end
352	object lblAciertos: TBGRALabel
353	Left = 536
354	Height = 39
355	Top = 8
356	Width = 95
357	AutoSize = False
358	Background.Color = clBtnFace
359	Background.Gradient1.StartColor = 15722194
360	Background.Gradient1.EndColor = 13137169
361	Background.Gradient1.Point1XPercent = 0
362	Background.Gradient1.Point1YPercent = 0
363	Background.Gradient1.Point2XPercent = 0
364	Background.Gradient1.Point2YPercent = 100
365	Background.Gradient2.StartColor = 13137169
366	Background.Gradient2.EndColor = 15722194
367	Background.Gradient2.Point1XPercent = 0
368	Background.Gradient2.Point1YPercent = 0
369	Background.Gradient2.Point2XPercent = 0
370	Background.Gradient2.Point2YPercent = 100
371	Background.Gradient1EndPercent = 35
372	Background.LightWidth = 0
373	Background.LightOpacity = 64
374	Caption = 'Aciertos'
375	ParentColor = False
376	TextShadowColor = 5592405
377	TextShadowColorOpacity = 255
378	TextShadowOffsetX = 1
379	TextShadowOffsetY = 1
380	TextShadowRadius = 1
381	GlobalOpacity = 255
382	TextApplyGlobalOpacity = False
383	Font.Color = clWhite
384	Font.Height = 25
385	end
386	object lblIntentos: TBGRALabel
387	Left = 536
388	Height = 39
389	Top = 48
390	Width = 95
391	AutoSize = False
392	Background.Color = clBtnFace
393	Background.Gradient1.StartColor = 15722194
394	Background.Gradient1.EndColor = 13137169
395	Background.Gradient1.Point1XPercent = 0
396	Background.Gradient1.Point1YPercent = 0
397	Background.Gradient1.Point2XPercent = 0
398	Background.Gradient1.Point2YPercent = 100
399	Background.Gradient2.StartColor = 13137169
400	Background.Gradient2.EndColor = 15722194
401	Background.Gradient2.Point1XPercent = 0
402	Background.Gradient2.Point1YPercent = 0
403	Background.Gradient2.Point2XPercent = 0
404	Background.Gradient2.Point2YPercent = 100
405	Background.Gradient1EndPercent = 35
406	Background.LightWidth = 0
407	Background.LightOpacity = 64
408	Caption = 'Intentos'
409	ParentColor = False
410	TextShadowColor = 5592405
411	TextShadowColorOpacity = 255
412	TextShadowOffsetX = 1
413	TextShadowOffsetY = 1
414	TextShadowRadius = 1
415	GlobalOpacity = 255
416	TextApplyGlobalOpacity = False
417	Font.Color = clWhite
418	Font.Height = 25
419	end
420	object n_aciertos: TBGRALabel
421	Left = 480
422	Height = 39
423	Top = 8
424	Width = 51
425	AutoSize = False
426	Background.Color = clBtnFace
427	Background.Gradient1.StartColor = 15722194
428	Background.Gradient1.EndColor = 13137169
429	Background.Gradient1.Point1XPercent = 0
430	Background.Gradient1.Point1YPercent = 0
431	Background.Gradient1.Point2XPercent = 0
432	Background.Gradient1.Point2YPercent = 100
433	Background.Gradient2.StartColor = 13137169
434	Background.Gradient2.EndColor = 15722194
435	Background.Gradient2.Point1XPercent = 0
436	Background.Gradient2.Point1YPercent = 0
437	Background.Gradient2.Point2XPercent = 0
438	Background.Gradient2.Point2YPercent = 100
439	Background.Gradient1EndPercent = 35
440	Background.LightWidth = 0
441	Background.LightOpacity = 64
442	Caption = '0'
443	ParentColor = False
444	TextShadowColor = 5592405
445	TextShadowColorOpacity = 255
446	TextShadowOffsetX = 1
447	TextShadowOffsetY = 1
448	TextShadowRadius = 1
449	GlobalOpacity = 255
450	TextApplyGlobalOpacity = False
451	Font.Color = clWhite
452	Font.Height = 25
453	end
454	object n_intentos: TBGRALabel
455	Left = 480
456	Height = 39
457	Top = 48
458	Width = 51
459	AutoSize = False
460	Background.Color = clBtnFace
461	Background.Gradient1.StartColor = 15722194
462	Background.Gradient1.EndColor = 13137169
463	Background.Gradient1.Point1XPercent = 0
464	Background.Gradient1.Point1YPercent = 0
465	Background.Gradient1.Point2XPercent = 0
466	Background.Gradient1.Point2YPercent = 100
467	Background.Gradient2.StartColor = 13137169
468	Background.Gradient2.EndColor = 15722194
469	Background.Gradient2.Point1XPercent = 0
470	Background.Gradient2.Point1YPercent = 0
471	Background.Gradient2.Point2XPercent = 0
472	Background.Gradient2.Point2YPercent = 100
473	Background.Gradient1EndPercent = 35
474	Background.LightWidth = 0
475	Background.LightOpacity = 64
476	Caption = '0'
477	ParentColor = False
478	TextShadowColor = 5592405
479	TextShadowColorOpacity = 255
480	TextShadowOffsetX = 1
481	TextShadowOffsetY = 1
482	TextShadowRadius = 1
483	GlobalOpacity = 255
484	TextApplyGlobalOpacity = False
485	Font.Color = clWhite
486	Font.Height = 25
487	end
488	object n_tiempo: TBGRALabel
489	Left = 8
490	Height = 39
491	Top = 8
492	Width = 32
493	AutoSize = False
494	Background.Color = clBtnFace
495	Background.Gradient1.StartColor = 15722194
496	Background.Gradient1.EndColor = 13137169
497	Background.Gradient1.Point1XPercent = 0
498	Background.Gradient1.Point1YPercent = 0
499	Background.Gradient1.Point2XPercent = 0
500	Background.Gradient1.Point2YPercent = 100
501	Background.Gradient2.StartColor = 13137169
502	Background.Gradient2.EndColor = 15722194
503	Background.Gradient2.Point1XPercent = 0
504	Background.Gradient2.Point1YPercent = 0
505	Background.Gradient2.Point2XPercent = 0
506	Background.Gradient2.Point2YPercent = 100
507	Background.Gradient1EndPercent = 35
508	Background.LightWidth = 0
509	Background.LightOpacity = 64
510	Caption = '00'
511	ParentColor = False
512	TextShadowColor = 5592405
513	TextShadowColorOpacity = 255
514	TextShadowOffsetX = 1
515	TextShadowOffsetY = 1
516	TextShadowRadius = 1
517	GlobalOpacity = 255
518	TextApplyGlobalOpacity = False
519	Font.Color = clWhite
520	Font.Height = 25
521	end
522	object btnIniciar: TBGRAImageButton
523	Left = 198
524	Height = 73
525	Top = 8
526	Width = 244
527	Anchors = [akTop, akLeft, akRight]
528	Animation = True
529	BitmapOptions.BorderWidth = 20
530	BitmapOptions.BorderHeight = 20
531	BitmapOptions.DrawMode = dmSet
532	BitmapOptions.ResampleMode = rmFineResample
533	BitmapOptions.ResampleFilter = rfBestQuality
534	BitmapOptions.Enable = True
535	BitmapOptions.FillLeft = False
536	BitmapOptions.FillTop = False
537	BitmapOptions.FillRight = False
538	BitmapOptions.FillBottom = False
539	BitmapOptions.FillCenter = False
540	Caption = 'Iniciar'
541	Font.Color = 5592405
542	Font.Height = 25
543	OnClick = btnIniciar_Click
544	ParentFont = False
545	Shadow.Alpha = 255
546	Shadow.Color = clWhite
547	Shadow.OffsetX = 0
548	Shadow.OffsetY = 2
549	Shadow.Visible = True
550	Shadow.Radius = 0
551	end
552	end
553	object temporizador: TTimer
554	Enabled = False
555	OnTimer = temporizadorTimer
556	left = 64
557	top = 8
558	end
559	end

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

Original Format