Changeset 24 for trunk/Forms/UMainForm.pas

Timestamp:

Sep 28, 2011, 9:14:55 PM (13 years ago)

Author:

george

Message:

• Fixed: Up to eight possible players with different colors.
• Fixed: Damage done to correct player shield.

File:

• trunk/Forms/UMainForm.pas (modified) (2 diffs)

trunk/Forms/UMainForm.pas

@@ -48 +48 @@
     procedure FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
     procedure FormShow(Sender: TObject);
+    procedure Image1MouseLeave(Sender: TObject);
     procedure Image1Resize(Sender: TObject);
     procedure TimerDrawTimer(Sender: TObject);
@@ -201 +202 @@
 end;
 
+procedure TMainForm.Image1MouseLeave(Sender: TObject);
+begin
+
+end;
+
 procedure TMainForm.Image1Resize(Sender: TObject);
 begin