Changeset 284 for trunk/Forms/UFormNation.pas

Timestamp:

Mar 10, 2019, 6:19:51 PM (6 years ago)

Author:

chronos

Message:

• Modified: TNation and TNations classes now uses generic TItem and TItemList classes.
• Added: Translation files for LCL.

File:

• trunk/Forms/UFormNation.pas (modified) (3 diffs)

trunk/Forms/UFormNation.pas

@@ -7 +7 @@
 uses
   Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
-  Spin, ColorBox, UNation;
+  ColorBox, UNation;
 
 type
@@ -30 +30 @@
   FormNation: TFormNation;
 
+
 implementation
 
@@ -40 +41 @@
   EditName.Text := Nation.Name;
   ColorBoxColor.Selected := Nation.Color;
+  Caption := Nation.Name + ' - ' + SNation;
 end;