Changeset 24 for trunk/Forms/UNewGameForm.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/UNewGameForm.pas (modified) (2 diffs)

trunk/Forms/UNewGameForm.pas

@@ -34 +34 @@
 
 uses
-  UCore;
+  UCore, UMainForm;
 
 {$R *.lfm}
@@ -60 +60 @@
     BeginUpdate;
     Clear;
-    for I := 0 to Engine.PlayerPool.Count - 1 do
-    with TPlayer(Engine.PlayerPool[I]) do begin
+    for I := 0 to MainForm.Engine.PlayerPool.Count - 1 do
+    with TPlayer(MainForm.Engine.PlayerPool[I]) do begin
       NewItem := Items.Add;
       NewItem.Caption := Name;