object FormNew: TFormNew Left = 470 Height = 795 Top = 353 Width = 1096 Caption = 'New game' ClientHeight = 795 ClientWidth = 1096 Constraints.MinHeight = 502 Constraints.MinWidth = 667 DesignTimePPI = 144 OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow Position = poMainFormCenter LCLVersion = '3.4.0.0' object PageControl1: TPageControl Left = 4 Height = 677 Top = 60 Width = 691 ActivePage = TabSheetMap Align = alClient BorderSpacing.Around = 4 ParentFont = False TabIndex = 2 TabOrder = 0 OnChange = PageControl1Change object TabSheetMode: TTabSheet Caption = 'Mode' ClientHeight = 639 ClientWidth = 683 ParentFont = False object Panel3: TPanel Left = 0 Height = 639 Top = 0 Width = 683 Align = alClient BevelOuter = bvNone ClientHeight = 639 ClientWidth = 683 ParentFont = False TabOrder = 0 object RadioButtonModeLocal: TRadioButton Left = 10 Height = 29 Top = 14 Width = 65 Caption = 'Local' Checked = True ParentFont = False TabOrder = 0 TabStop = True OnChange = RadioButtonModeLocalChange end object RadioButtonModeNetworkServer: TRadioButton Left = 10 Height = 29 Top = 48 Width = 144 Caption = 'Network server' ParentFont = False TabOrder = 1 OnChange = RadioButtonModeLocalChange end object RadioButtonModeNetworkClient: TRadioButton Left = 10 Height = 29 Top = 160 Width = 138 Caption = 'Network client' ParentFont = False TabOrder = 2 OnChange = RadioButtonModeLocalChange end object EditServerAddress: TEdit Left = 24 Height = 33 Top = 112 Width = 220 ParentFont = False TabOrder = 3 end object SpinEditServerPort: TSpinEdit Left = 256 Height = 33 Top = 112 Width = 79 MaxValue = 65535 ParentFont = False TabOrder = 4 end object Label11: TLabel Left = 256 Height = 25 Top = 80 Width = 36 Caption = 'Port:' ParentColor = False ParentFont = False end object Label12: TLabel Left = 24 Height = 25 Top = 80 Width = 69 Caption = 'Address:' ParentColor = False ParentFont = False end object ListViewServers: TListView Left = 26 Height = 386 Top = 200 Width = 334 Anchors = [akTop, akLeft, akBottom] Columns = < item Caption = 'Name' Width = 100 end item Caption = 'Address' Width = 219 end> MultiSelect = True OwnerData = True ParentFont = False PopupMenu = PopupMenuServers ReadOnly = True RowSelect = True TabOrder = 5 ViewStyle = vsReport OnData = ListViewServersData OnDblClick = AServerModifyExecute OnKeyPress = ListViewServersKeyPress OnSelectItem = ListViewServersSelectItem end object Button1: TButton Left = 26 Height = 38 Top = 594 Width = 94 Action = AServerAdd Anchors = [akLeft, akBottom] ParentFont = False TabOrder = 6 end object Button2: TButton Left = 248 Height = 38 Top = 594 Width = 94 Action = AServerRemove Anchors = [akLeft, akBottom] ParentFont = False TabOrder = 7 end object Button3: TButton Left = 136 Height = 38 Top = 594 Width = 94 Action = AServerModify Anchors = [akLeft, akBottom] ParentFont = False TabOrder = 8 end end end object TabSheetPlayers: TTabSheet Caption = 'Players' ClientHeight = 639 ClientWidth = 683 ParentFont = False object Panel2: TPanel Left = 0 Height = 639 Top = 0 Width = 683 Align = alClient BevelOuter = bvNone ParentFont = False TabOrder = 0 end end object TabSheetMap: TTabSheet Caption = 'Map' ClientHeight = 639 ClientWidth = 683 OnShow = TabSheetMapShow ParentFont = False object Panel1: TPanel Left = 0 Height = 639 Top = 0 Width = 683 Align = alClient BevelOuter = bvNone ClientHeight = 639 ClientWidth = 683 ParentFont = False TabOrder = 0 object Label1: TLabel Left = 8 Height = 25 Top = 10 Width = 89 Caption = 'Map width:' ParentColor = False ParentFont = False end object Label2: TLabel Left = 8 Height = 25 Top = 58 Width = 95 Caption = 'Map height:' ParentColor = False ParentFont = False end object SpinEditMapSizeX: TSpinEdit Left = 128 Height = 33 Top = 4 Width = 98 MinValue = 2 OnChange = SpinEditMapSizeXChange ParentFont = False TabOrder = 0 Value = 2 end object SpinEditMapSizeY: TSpinEdit Left = 128 Height = 33 Top = 55 Width = 98 MinValue = 2 OnChange = SpinEditMapSizeYChange ParentFont = False TabOrder = 1 Value = 2 end object TrackBarSizeX: TTrackBar Left = 240 Height = 58 Top = 8 Width = 432 Max = 100 Min = 2 OnChange = TrackBarSizeXChange Position = 2 TickStyle = tsNone Anchors = [akTop, akLeft, akRight] ParentFont = False TabOrder = 2 end object TrackBarSizeY: TTrackBar Left = 240 Height = 58 Top = 49 Width = 432 Max = 100 Min = 2 OnChange = TrackBarSizeYChange Position = 2 TickStyle = tsNone Anchors = [akTop, akLeft, akRight] ParentFont = False TabOrder = 3 end object Label5: TLabel Left = 8 Height = 25 Top = 104 Width = 77 Caption = 'Grid type:' ParentColor = False ParentFont = False end object ComboBoxGridType: TComboBox Left = 146 Height = 33 Top = 104 Width = 304 ItemHeight = 25 Items.Strings = ( 'Hexagon vertical' 'Square' 'Triangular' 'Random' 'Isometric' 'Hexagon horizontal' ) ParentFont = False Style = csDropDownList TabOrder = 4 OnChange = ComboBoxGridTypeChange end object ComboBoxMapShape: TComboBox Left = 146 Height = 33 Top = 144 Width = 304 ItemHeight = 25 Items.Strings = ( 'Hexagonal' 'Square' 'Triangular' ) ParentFont = False Style = csDropDownList TabOrder = 5 OnChange = ComboBoxMapShapeChange end object Label8: TLabel Left = 8 Height = 25 Top = 144 Width = 92 Caption = 'Map shape:' ParentColor = False ParentFont = False end object CheckBoxSymetricMap: TCheckBox Left = 8 Height = 29 Top = 248 Width = 134 Caption = 'Symetric map' ParentFont = False TabOrder = 6 OnChange = CheckBoxSymetricMapChange end object SpinEditVoidPercent: TSpinEdit Left = 216 Height = 33 Top = 314 Width = 106 MinValue = 1 OnChange = SpinEditVoidPercentChange ParentFont = False TabOrder = 7 Value = 1 end object CheckBoxVoid: TCheckBox Left = 8 Height = 29 Top = 318 Width = 172 Caption = 'Inaccessible places' ParentFont = False TabOrder = 8 OnChange = CheckBoxVoidChange end object CheckBoxCity: TCheckBox Left = 8 Height = 29 Top = 368 Width = 67 Caption = 'Cities' ParentFont = False TabOrder = 9 OnChange = CheckBoxCityChange end object SpinEditCityPercent: TSpinEdit Left = 216 Height = 33 Top = 360 Width = 106 MinValue = 1 OnChange = SpinEditCityPercentChange ParentFont = False TabOrder = 10 Value = 1 end object Label4: TLabel Left = 331 Height = 25 Top = 368 Width = 15 Caption = '%' ParentColor = False ParentFont = False end object Label3: TLabel Left = 331 Height = 25 Top = 324 Width = 15 Caption = '%' ParentColor = False ParentFont = False end object SpinEditNeutralUnits: TSpinEdit Left = 312 Height = 33 Top = 488 Width = 98 MaxValue = 99 OnChange = SpinEditNeutralUnitsChange ParentFont = False TabOrder = 11 Value = 12 end object Label7: TLabel Left = 8 Height = 25 Top = 496 Width = 207 Caption = 'Max random neutral units:' ParentColor = False ParentFont = False end object EditImageFile: TEdit Left = 144 Height = 33 Top = 184 Width = 415 Anchors = [akTop, akLeft, akRight] ParentFont = False TabOrder = 12 OnChange = EditImageFileChange end object ButtonImageBrowse: TButton Left = 568 Height = 38 Top = 182 Width = 98 Anchors = [akTop, akRight] Caption = 'Browse' ParentFont = False TabOrder = 13 OnClick = ButtonImageBrowseClick end object Label9: TLabel Left = 8 Height = 25 Top = 184 Width = 82 Caption = 'Image file:' ParentColor = False ParentFont = False end object CheckBoxBridges: TCheckBox Left = 8 Height = 29 Top = 408 Width = 194 Caption = 'Bridges between cells' ParentFont = False TabOrder = 14 OnChange = CheckBoxBridgesChange end object SpinEditMaxPower: TSpinEdit Left = 312 Height = 33 Top = 440 Width = 98 MaxValue = 1000000 MinValue = 1 OnChange = SpinEditMaxPowerChange ParentFont = False TabOrder = 15 Value = 99 end object Label10: TLabel Left = 8 Height = 25 Top = 448 Width = 141 Caption = 'Max units per cell:' ParentColor = False ParentFont = False end object CheckBoxCyclicMap: TCheckBox Left = 8 Height = 29 Top = 283 Width = 110 Caption = 'Cyclic map' ParentFont = False TabOrder = 16 OnChange = CheckBoxCyclicMapChange end object Image1: TImage Left = 419 Height = 316 Top = 272 Width = 255 Anchors = [akTop, akLeft, akRight] OnResize = Image1Resize end object Label15: TLabel Left = 419 Height = 25 Top = 240 Width = 64 Caption = 'Preview:' ParentColor = False ParentFont = False end object ButtonRandomize: TButton Left = 10 Height = 38 Top = 540 Width = 154 Caption = 'Randomize' ParentFont = False TabOrder = 17 OnClick = ButtonRandomizeClick end end end object TabSheetRules: TTabSheet Caption = 'Rules' ClientHeight = 639 ClientWidth = 683 ParentFont = False object Panel4: TPanel Left = 0 Height = 639 Top = 0 Width = 683 Align = alClient BevelOuter = bvNone ClientHeight = 639 ClientWidth = 683 ParentFont = False TabOrder = 0 object RadioGroupGrowCells: TRadioGroup Left = 14 Height = 128 Top = 120 Width = 312 AutoFill = True Caption = 'Growing cells' ChildSizing.LeftRightSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 1 ClientHeight = 98 ClientWidth = 308 Items.Strings = ( 'None' 'Player cities' 'Player all' ) ParentFont = False TabOrder = 0 end object Label6: TLabel Left = 8 Height = 25 Top = 267 Width = 111 Caption = 'Win objective:' ParentColor = False ParentFont = False end object ComboBoxWinObjective: TComboBox Left = 216 Height = 33 Top = 267 Width = 328 ItemHeight = 25 Items.Strings = ( 'Defeat all oponents' 'Defeat all oponents cities' 'Capture position' 'Stay alive for number of turns' ) ParentFont = False Style = csDropDownList TabOrder = 1 OnChange = ComboBoxWinObjectiveChange end object RadioGroupGrowAmount: TRadioGroup Left = 14 Height = 92 Top = 16 Width = 305 AutoFill = True Caption = 'Per turn grow amount' ChildSizing.LeftRightSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 1 ClientHeight = 62 ClientWidth = 301 Items.Strings = ( 'By one' 'By square root' ) ParentFont = False TabOrder = 2 end object CheckBoxFogOfWar: TCheckBox Left = 336 Height = 29 Top = 24 Width = 111 Caption = 'Fog of war' ParentFont = False TabOrder = 3 end object PageControlWinObjective: TPageControl Left = 12 Height = 110 Top = 314 Width = 660 ActivePage = TabSheetCaptureEntireMap Anchors = [akTop, akLeft, akRight] ParentFont = False ShowTabs = False TabIndex = 5 TabOrder = 4 object TabSheetDefeatEnemies: TTabSheet ParentFont = False end object TabSheetCaptureCities: TTabSheet ParentFont = False end object TabSheetCaptureCells: TTabSheet ClientHeight = 102 ClientWidth = 652 ParentFont = False object Label14: TLabel Left = 8 Height = 25 Top = 16 Width = 147 Caption = 'Special cells count:' ParentColor = False ParentFont = False end object SpinEditSpecialCells: TSpinEdit Left = 236 Height = 33 Top = 8 Width = 158 MaxValue = 1000 MinValue = 1 ParentFont = False TabOrder = 0 Value = 1 end end object TabSheetStayAliveTurns: TTabSheet ClientHeight = 102 ClientWidth = 652 ParentFont = False object Label13: TLabel Left = 8 Height = 25 Top = 16 Width = 136 Caption = 'Number of turns:' ParentColor = False ParentFont = False end object SpinEditTurns: TSpinEdit Left = 236 Height = 33 Top = 8 Width = 158 MaxValue = 1000 MinValue = 1 ParentFont = False TabOrder = 0 Value = 1 end end object TabSheetNone: TTabSheet ParentFont = False end object TabSheetCaptureEntireMap: TTabSheet ParentFont = False end end end end end object PanelButtons: TPanel Left = 0 Height = 54 Top = 741 Width = 1096 Align = alBottom BevelOuter = bvNone ClientHeight = 54 ClientWidth = 1096 ParentFont = False TabOrder = 1 object ButtonOk: TButton Left = 976 Height = 38 Top = 8 Width = 106 Anchors = [akRight, akBottom] Caption = 'Ok' ModalResult = 1 ParentFont = False TabOrder = 0 OnClick = ButtonOkClick end object ButtonCancel: TButton Left = 845 Height = 38 Top = 8 Width = 114 Anchors = [akRight, akBottom] Caption = 'Cancel' ModalResult = 2 ParentFont = False TabOrder = 1 end end object PanelChat: TPanel Left = 705 Height = 685 Top = 56 Width = 391 Align = alRight BevelOuter = bvNone ParentFont = False TabOrder = 2 end object Splitter1: TSplitter Left = 699 Height = 685 Top = 56 Width = 6 Align = alRight ResizeAnchor = akRight end object Panel5: TPanel Left = 0 Height = 56 Top = 0 Width = 1096 Align = alTop BevelOuter = bvNone ClientHeight = 56 ClientWidth = 1096 ParentFont = False TabOrder = 4 object Label16: TLabel Left = 12 Height = 25 Top = 14 Width = 111 Caption = 'Game system:' ParentColor = False ParentFont = False end object ComboBoxGameSystem: TComboBox Left = 176 Height = 33 Top = 12 Width = 254 ItemHeight = 25 ParentFont = False Style = csDropDownList TabOrder = 0 OnChange = ComboBoxGameSystemChange end object ButtonGameSystems: TButton Left = 443 Height = 38 Top = 10 Width = 113 Caption = 'Manage' ParentFont = False TabOrder = 1 OnClick = ButtonGameSystemsClick end end object ActionList1: TActionList Images = Core.ImageListSmall Left = 864 Top = 216 object AServerAdd: TAction Caption = 'Add' OnExecute = AServerAddExecute end object AServerRemove: TAction Caption = 'Remove' OnExecute = AServerRemoveExecute end object AServerModify: TAction Caption = 'Modify' OnExecute = AServerModifyExecute end end object OpenPictureDialog1: TOpenPictureDialog Left = 864 Top = 360 end object PopupMenuServers: TPopupMenu Left = 864 Top = 136 object MenuItem4: TMenuItem Action = AServerAdd end object MenuItem6: TMenuItem Action = AServerModify end object MenuItem5: TMenuItem Action = AServerRemove end end object TimerMapPreview: TTimer Interval = 500 OnTimer = TimerMapPreviewTimer Left = 864 Top = 446 end end