Changeset 388
- Timestamp:
- Jan 4, 2025, 11:08:13 PM (2 days ago)
- Location:
- trunk/Forms
- Files:
-
- 8 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/FormGameSystem.lfm
r365 r388 60 60 Top = 16 61 61 Width = 612 62 ActivePage = TabSheet General62 ActivePage = TabSheetBuildings 63 63 Anchors = [akTop, akLeft, akRight, akBottom] 64 64 ParentFont = False 65 TabIndex = 065 TabIndex = 3 66 66 TabOrder = 4 67 67 object TabSheetGeneral: TTabSheet … … 70 70 ClientWidth = 602 71 71 ParentFont = False 72 object CheckBoxEmptyCellsNeutral: TCheckBox 73 Left = 16 74 Height = 30 75 Top = 16 76 Width = 357 77 Caption = 'Set cells without player units as neutral' 78 ParentFont = False 72 object ScrollBoxGeneral: TScrollBox 73 Left = 0 74 Height = 360 75 Top = 0 76 Width = 602 77 HorzScrollBar.Page = 576 78 VertScrollBar.Page = 174 79 Align = alClient 80 ClientHeight = 358 81 ClientWidth = 600 79 82 TabOrder = 0 80 end 81 object CheckBoxUnitsSplitMerge: TCheckBox 82 Left = 16 83 Height = 30 84 Top = 55 85 Width = 229 86 Caption = 'Units can split or merge' 87 ParentFont = False 88 TabOrder = 1 89 end 90 object CheckBoxUnitsMoveImmediately: TCheckBox 91 Left = 16 92 Height = 30 93 Top = 95 94 Width = 232 95 Caption = 'Units move immediately' 96 ParentFont = False 97 TabOrder = 2 98 end 99 object Label5: TLabel 100 Left = 16 101 Height = 26 102 Top = 136 103 Width = 164 104 Caption = 'Preferred grid type:' 105 ParentColor = False 106 ParentFont = False 107 end 108 object ComboBoxPreferredGridType: TComboBox 109 Left = 272 110 Height = 38 111 Top = 136 112 Width = 304 113 ItemHeight = 0 114 Items.Strings = ( 115 'None' 116 'Hexagon vertical' 117 'Square' 118 'Triangular' 119 'Random' 120 'Isometric' 121 'Hexagon horizontal' 122 ) 123 ParentFont = False 124 Style = csDropDownList 125 TabOrder = 3 83 object Label5: TLabel 84 Left = 16 85 Height = 26 86 Top = 136 87 Width = 164 88 Caption = 'Preferred grid type:' 89 ParentColor = False 90 ParentFont = False 91 end 92 object ComboBoxPreferredGridType: TComboBox 93 Left = 272 94 Height = 38 95 Top = 136 96 Width = 304 97 ItemHeight = 0 98 Items.Strings = ( 99 'None' 100 'Hexagon vertical' 101 'Square' 102 'Triangular' 103 'Random' 104 'Isometric' 105 'Hexagon horizontal' 106 ) 107 ParentFont = False 108 Style = csDropDownList 109 TabOrder = 0 110 end 111 object CheckBoxUnitsMoveImmediately: TCheckBox 112 Left = 16 113 Height = 30 114 Top = 95 115 Width = 232 116 Caption = 'Units move immediately' 117 ParentFont = False 118 TabOrder = 1 119 end 120 object CheckBoxUnitsSplitMerge: TCheckBox 121 Left = 16 122 Height = 30 123 Top = 55 124 Width = 229 125 Caption = 'Units can split or merge' 126 ParentFont = False 127 TabOrder = 2 128 end 129 object CheckBoxEmptyCellsNeutral: TCheckBox 130 Left = 16 131 Height = 30 132 Top = 16 133 Width = 357 134 Caption = 'Set cells without player units as neutral' 135 ParentFont = False 136 TabOrder = 3 137 end 126 138 end 127 139 end -
trunk/Forms/FormGameSystem.lrj
r365 r388 6 6 {"hash":1339,"name":"tformgamesystem.buttonok.caption","sourcebytes":[79,75],"value":"OK"}, 7 7 {"hash":231000124,"name":"tformgamesystem.tabsheetgeneral.caption","sourcebytes":[71,101,110,101,114,97,108],"value":"General"}, 8 {"hash":94511754,"name":"tformgamesystem.label5.caption","sourcebytes":[80,114,101,102,101,114,114,101,100,32,103,114,105,100,32,116,121,112,101,58],"value":"Preferred grid type:"}, 9 {"hash":113503305,"name":"tformgamesystem.checkboxunitsmoveimmediately.caption","sourcebytes":[85,110,105,116,115,32,109,111,118,101,32,105,109,109,101,100,105,97,116,101,108,121],"value":"Units move immediately"}, 10 {"hash":49324869,"name":"tformgamesystem.checkboxunitssplitmerge.caption","sourcebytes":[85,110,105,116,115,32,99,97,110,32,115,112,108,105,116,32,111,114,32,109,101,114,103,101],"value":"Units can split or merge"}, 8 11 {"hash":6092588,"name":"tformgamesystem.checkboxemptycellsneutral.caption","sourcebytes":[83,101,116,32,99,101,108,108,115,32,119,105,116,104,111,117,116,32,112,108,97,121,101,114,32,117,110,105,116,115,32,97,115,32,110,101,117,116,114,97,108],"value":"Set cells without player units as neutral"}, 9 {"hash":49324869,"name":"tformgamesystem.checkboxunitssplitmerge.caption","sourcebytes":[85,110,105,116,115,32,99,97,110,32,115,112,108,105,116,32,111,114,32,109,101,114,103,101],"value":"Units can split or merge"},10 {"hash":113503305,"name":"tformgamesystem.checkboxunitsmoveimmediately.caption","sourcebytes":[85,110,105,116,115,32,109,111,118,101,32,105,109,109,101,100,105,97,116,101,108,121],"value":"Units move immediately"},11 {"hash":94511754,"name":"tformgamesystem.label5.caption","sourcebytes":[80,114,101,102,101,114,114,101,100,32,103,114,105,100,32,116,121,112,101,58],"value":"Preferred grid type:"},12 12 {"hash":6049971,"name":"tformgamesystem.tabsheetunits.caption","sourcebytes":[85,110,105,116,115],"value":"Units"}, 13 13 {"hash":76219907,"name":"tformgamesystem.tabsheetnations.caption","sourcebytes":[78,97,116,105,111,110,115],"value":"Nations"}, -
trunk/Forms/FormGameSystem.pas
r358 r388 24 24 PageControl1: TPageControl; 25 25 SaveDialog1: TSaveDialog; 26 ScrollBoxGeneral: TScrollBox; 26 27 TabSheetBuildings: TTabSheet; 27 28 TabSheetNations: TTabSheet; -
trunk/Forms/FormMove.lfm
r377 r388 1 1 object FormMove: TFormMove 2 2 Left = 938 3 Height = 3 183 Height = 323 4 4 Top = 539 5 5 Width = 493 6 6 ActiveControl = ButtonOk 7 7 Caption = 'Move' 8 ClientHeight = 3 188 ClientHeight = 323 9 9 ClientWidth = 493 10 10 Constraints.MinHeight = 100 … … 18 18 Left = 160 19 19 Height = 38 20 Top = 27 220 Top = 277 21 21 Width = 100 22 22 Anchors = [akRight, akBottom] … … 30 30 Left = 272 31 31 Height = 38 32 Top = 27 232 Top = 277 33 33 Width = 100 34 34 Anchors = [akRight, akBottom] … … 41 41 Left = 384 42 42 Height = 38 43 Top = 27 243 Top = 277 44 44 Width = 100 45 45 Anchors = [akRight, akBottom] … … 51 51 object ScrollBox1: TScrollBox 52 52 Left = 8 53 Height = 25 053 Height = 255 54 54 Top = 8 55 55 Width = 477 … … 59 59 Anchors = [akTop, akLeft, akRight, akBottom] 60 60 BorderSpacing.Around = 8 61 ClientHeight = 2 4861 ClientHeight = 253 62 62 ClientWidth = 475 63 63 TabOrder = 3 -
trunk/Forms/FormNew.lfm
r365 r388 7 7 ClientHeight = 794 8 8 ClientWidth = 1401 9 Constraints.MinHeight = 50210 Constraints.MinWidth = 6679 Constraints.MinHeight = 300 10 Constraints.MinWidth = 300 11 11 DesignTimePPI = 144 12 12 OnCreate = FormCreate … … 20 20 Top = 60 21 21 Width = 996 22 ActivePage = TabSheet Map22 ActivePage = TabSheetPlayers 23 23 Align = alClient 24 24 BorderSpacing.Around = 4 25 25 ParentFont = False 26 TabIndex = 226 TabIndex = 1 27 27 TabOrder = 0 28 28 OnChange = PageControl1Change … … 32 32 ClientWidth = 986 33 33 ParentFont = False 34 object Panel3: TPanel34 object ScrollBoxMode: TScrollBox 35 35 Left = 0 36 36 Height = 636 37 37 Top = 0 38 38 Width = 986 39 HorzScrollBar.Page = 360 40 VertScrollBar.Page = 225 39 41 Align = alClient 40 BevelOuter = bvNone 41 ClientHeight = 636 42 ClientWidth = 986 42 ClientHeight = 634 43 ClientWidth = 984 43 44 ParentFont = False 44 45 TabOrder = 0 … … 112 113 object ListViewServers: TListView 113 114 Left = 26 114 Height = 38 3115 Height = 381 115 116 Top = 200 116 117 Width = 334 … … 141 142 Left = 26 142 143 Height = 38 143 Top = 5 91144 Top = 589 144 145 Width = 94 145 146 Action = AServerAdd … … 151 152 Left = 248 152 153 Height = 38 153 Top = 5 91154 Top = 589 154 155 Width = 94 155 156 Action = AServerRemove … … 161 162 Left = 136 162 163 Height = 38 163 Top = 5 91164 Top = 589 164 165 Width = 94 165 166 Action = AServerModify … … 192 193 OnShow = TabSheetMapShow 193 194 ParentFont = False 194 object Panel1: TPanel195 object ScrollBoxMap: TScrollBox 195 196 Left = 0 196 197 Height = 636 197 198 Top = 0 198 199 Width = 986 200 HorzScrollBar.Page = 490 201 VertScrollBar.Page = 578 199 202 Align = alClient 200 BevelOuter = bvNone 201 ClientHeight = 636 202 ClientWidth = 986 203 ClientHeight = 632 204 ClientWidth = 982 203 205 ParentFont = False 204 206 TabOrder = 0 … … 223 225 object SpinEditMapSizeX: TSpinEdit 224 226 Left = 128 225 Height = 43227 Height = 34 226 228 Top = 4 227 229 Width = 98 … … 234 236 object SpinEditMapSizeY: TSpinEdit 235 237 Left = 128 236 Height = 43238 Height = 34 237 239 Top = 55 238 240 Width = 98 … … 245 247 object TrackBarSizeX: TTrackBar 246 248 Left = 240 247 Height = 58249 Height = 30 248 250 Top = 8 249 Width = 735251 Width = 28 250 252 Max = 100 251 253 Min = 2 … … 259 261 object TrackBarSizeY: TTrackBar 260 262 Left = 240 261 Height = 58263 Height = 30 262 264 Top = 49 263 Width = 735265 Width = 28 264 266 Max = 100 265 267 Min = 2 … … 282 284 object ComboBoxGridType: TComboBox 283 285 Left = 146 284 Height = 3 8286 Height = 34 285 287 Top = 104 286 288 Width = 304 … … 301 303 object ComboBoxMapShape: TComboBox 302 304 Left = 146 303 Height = 3 8305 Height = 34 304 306 Top = 144 305 307 Width = 304 … … 328 330 Height = 30 329 331 Top = 248 330 Width = 1 42332 Width = 139 331 333 Caption = 'Symetric map' 332 334 ParentFont = False … … 336 338 object SpinEditVoidPercent: TSpinEdit 337 339 Left = 216 338 Height = 43340 Height = 34 339 341 Top = 314 340 342 Width = 106 … … 349 351 Height = 30 350 352 Top = 320 351 Width = 18 9353 Width = 186 352 354 Caption = 'Inaccessible places' 353 355 ParentFont = False … … 359 361 Height = 30 360 362 Top = 366 361 Width = 72363 Width = 69 362 364 Caption = 'Cities' 363 365 ParentFont = False … … 367 369 object SpinEditCityPercent: TSpinEdit 368 370 Left = 216 369 Height = 43371 Height = 34 370 372 Top = 360 371 373 Width = 106 … … 396 398 object SpinEditNeutralUnits: TSpinEdit 397 399 Left = 312 398 Height = 43400 Height = 34 399 401 Top = 488 400 402 Width = 98 … … 416 418 object EditImageFile: TEdit 417 419 Left = 146 418 Height = 43420 Height = 34 419 421 Top = 184 420 Width = 71 6422 Width = 712 421 423 Anchors = [akTop, akLeft, akRight] 422 424 ParentFont = False … … 425 427 end 426 428 object ButtonImageBrowse: TButton 427 Left = 8 71429 Left = 867 428 430 Height = 43 429 431 Top = 184 … … 448 450 Height = 30 449 451 Top = 408 450 Width = 2 11452 Width = 208 451 453 Caption = 'Bridges between cells' 452 454 ParentFont = False … … 456 458 object SpinEditMaxPower: TSpinEdit 457 459 Left = 312 458 Height = 43460 Height = 34 459 461 Top = 440 460 462 Width = 98 … … 479 481 Height = 30 480 482 Top = 283 481 Width = 11 7483 Width = 114 482 484 Caption = 'Cyclic map' 483 485 ParentFont = False … … 487 489 object Image1: TImage 488 490 Left = 419 489 Height = 3 60491 Height = 356 490 492 Top = 272 491 Width = 55 7493 Width = 553 492 494 Anchors = [akTop, akLeft, akRight, akBottom] 493 495 OnResize = Image1Resize … … 519 521 ClientWidth = 986 520 522 ParentFont = False 521 object Panel4: TPanel523 object ScrollBoxRules: TScrollBox 522 524 Left = 0 523 525 Height = 636 524 526 Top = 0 525 527 Width = 986 528 HorzScrollBar.Page = 544 529 VertScrollBar.Page = 424 526 530 Align = alClient 527 BevelOuter = bvNone 528 ClientHeight = 636 529 ClientWidth = 986 531 ClientHeight = 632 532 ClientWidth = 982 530 533 ParentFont = False 531 534 TabOrder = 0 … … 565 568 object ComboBoxWinObjective: TComboBox 566 569 Left = 216 567 Height = 3 8570 Height = 34 568 571 Top = 266 569 572 Width = 328 … … 607 610 Height = 30 608 611 Top = 24 609 Width = 11 5612 Width = 112 610 613 Caption = 'Fog of war' 611 614 ParentFont = False … … 616 619 Height = 110 617 620 Top = 314 618 Width = 9 63621 Width = 959 619 622 ActivePage = TabSheetCaptureEntireMap 620 623 Anchors = [akTop, akLeft, akRight] … … 631 634 object TabSheetCaptureCells: TTabSheet 632 635 ClientHeight = 67 633 ClientWidth = 9 53636 ClientWidth = 949 634 637 ParentFont = False 635 638 object Label14: TLabel … … 656 659 object TabSheetStayAliveTurns: TTabSheet 657 660 ClientHeight = 67 658 ClientWidth = 9 53661 ClientWidth = 949 659 662 ParentFont = False 660 663 object Label13: TLabel … … 742 745 ResizeAnchor = akRight 743 746 end 744 object Panel 5: TPanel747 object PanelGameSystem: TPanel 745 748 Left = 0 746 749 Height = 56 -
trunk/Forms/FormNew.pas
r377 r388 61 61 PageControl1: TPageControl; 62 62 PageControlWinObjective: TPageControl; 63 Panel1: TPanel;63 ScrollBoxMap: TScrollBox; 64 64 Panel2: TPanel; 65 Panel3: TPanel;66 Panel4: TPanel;67 Panel 5: TPanel;65 ScrollBoxMode: TScrollBox; 66 ScrollBoxRules: TScrollBox; 67 PanelGameSystem: TPanel; 68 68 PanelButtons: TPanel; 69 69 PanelChat: TPanel; -
trunk/Forms/FormSettings.lfm
r386 r388 1 1 object FormSettings: TFormSettings 2 2 Left = 545 3 Height = 3533 Height = 426 4 4 Top = 203 5 Width = 6 895 Width = 614 6 6 ActiveControl = ButtonOk 7 7 Caption = 'Settings' 8 ClientHeight = 3539 ClientWidth = 6 898 ClientHeight = 426 9 ClientWidth = 614 10 10 Constraints.MinHeight = 200 11 11 Constraints.MinWidth = 300 … … 16 16 LCLVersion = '3.6.0.0' 17 17 object ButtonOk: TButton 18 Left = 44018 Left = 365 19 19 Height = 38 20 Top = 3 0820 Top = 381 21 21 Width = 114 22 22 Anchors = [akRight, akBottom] … … 27 27 end 28 28 object ButtonCancel: TButton 29 Left = 56729 Left = 492 30 30 Height = 38 31 Top = 3 0831 Top = 381 32 32 Width = 114 33 33 Anchors = [akRight, akBottom] … … 39 39 object PageControl1: TPageControl 40 40 Left = 8 41 Height = 29241 Height = 365 42 42 Top = 8 43 Width = 67343 Width = 598 44 44 ActivePage = TabSheetGeneral 45 45 Align = alTop … … 51 51 object TabSheetGeneral: TTabSheet 52 52 Caption = 'General' 53 ClientHeight = 25254 ClientWidth = 66353 ClientHeight = 325 54 ClientWidth = 588 55 55 ParentFont = False 56 object Panel1: TPanel56 object ScrollBoxGeneral: TScrollBox 57 57 Left = 0 58 Height = 25258 Height = 325 59 59 Top = 0 60 Width = 663 60 Width = 588 61 HorzScrollBar.Page = 383 62 VertScrollBar.Page = 163 61 63 Align = alClient 62 BevelOuter = bvNone 63 ClientHeight = 252 64 ClientWidth = 663 64 ClientHeight = 323 65 ClientWidth = 586 65 66 ParentFont = False 66 67 TabOrder = 0 … … 133 134 object TabSheetDebug: TTabSheet 134 135 Caption = 'Debug' 135 ClientHeight = 252136 ClientWidth = 663136 ClientHeight = 325 137 ClientWidth = 588 137 138 ParentFont = False 138 object Panel2: TPanel139 object ScrollBoxDebug: TScrollBox 139 140 Left = 0 140 Height = 252141 Height = 325 141 142 Top = 0 142 Width = 663 143 Width = 588 144 HorzScrollBar.Page = 322 145 VertScrollBar.Page = 162 143 146 Align = alClient 144 BevelOuter = bvNone 145 ClientHeight = 252 146 ClientWidth = 663 147 ClientHeight = 321 148 ClientWidth = 584 147 149 ParentFont = False 148 150 TabOrder = 0 … … 151 153 Height = 24 152 154 Top = 32 153 Width = 631155 Width = 552 154 156 Anchors = [akTop, akLeft, akRight] 155 157 AutoSize = False … … 170 172 object SpinEditX: TSpinEdit 171 173 Left = 104 172 Height = 43174 Height = 34 173 175 Top = 64 174 176 Width = 96 … … 190 192 object SpinEditY: TSpinEdit 191 193 Left = 232 192 Height = 43194 Height = 34 193 195 Top = 64 194 196 Width = 90 … … 203 205 Height = 26 204 206 Top = 136 205 Width = 635207 Width = 556 206 208 Anchors = [akTop, akLeft, akRight] 207 209 AutoSize = False -
trunk/Forms/FormSettings.pas
r354 r388 25 25 Label6: TLabel; 26 26 PageControl1: TPageControl; 27 Panel1: TPanel;28 Panel2: TPanel;27 ScrollBoxGeneral: TScrollBox; 28 ScrollBoxDebug: TScrollBox; 29 29 SpinEditAnimSpeed: TSpinEdit; 30 30 SpinEditX: TSpinEdit;
Note:
See TracChangeset
for help on using the changeset viewer.