Changeset 4 for trunk/UMainForm.lfm

Timestamp:

Mar 6, 2011, 6:43:01 PM (14 years ago)

Author:

george

Message:

• Added: Complete map visualizaiton.
• Added: Generating map rock border.
• Added: Tank movement colision detection.
• Added: Some bullet shooting test.

File:

• trunk/UMainForm.lfm (modified) (6 diffs)

trunk/UMainForm.lfm

@@ -4 +4 @@
   Top = 95
   Width = 514
-  Caption = 'MainForm'
+  Caption = 'Tunneler'
   ClientHeight = 389
   ClientWidth = 514
@@ -11 +11 @@
   OnKeyDown = FormKeyDown
   OnKeyUp = FormKeyUp
+  OnShow = FormShow
   LCLVersion = '0.9.31'
   object Image1: TImage
@@ -19 +20 @@
     Align = alClient
     OnResize = Image1Resize
-    Stretch = True
   end
   object StatusBar1: TStatusBar
@@ -35 +35 @@
     SimplePanel = False
   end
-  object Timer1: TTimer
+  object TimerDraw: TTimer
     Interval = 50
-    OnTimer = Timer1Timer
+    OnTimer = TimerDrawTimer
     left = 99
     top = 50
@@ -50 +50 @@
         OnClick = MenuItem3Click
       end
+      object MenuItemShowMap: TMenuItem
+        Caption = 'Show map'
+        OnClick = MenuItemShowMapClick
+      end
       object MenuItem2: TMenuItem
         Caption = 'Exit'
@@ -56 +60 @@
     end
   end
+  object TimerEngineTick: TTimer
+    Interval = 10
+    OnTimer = TimerEngineTickTimer
+    left = 96
+    top = 104
+  end
 end