Changeset 364 for trunk/Forms
- Timestamp:
- Jan 1, 2025, 1:04:50 AM (3 weeks ago)
- Location:
- trunk/Forms
- Files:
-
- 11 edited
-
FormCharts.lfm (modified) (3 diffs)
-
FormChat.lfm (modified) (3 diffs)
-
FormClient.lfm (modified) (2 diffs)
-
FormHelp.lfm (modified) (2 diffs)
-
FormMain.lfm (modified) (6 diffs)
-
FormMain.pas (modified) (2 diffs)
-
FormNew.lfm (modified) (63 diffs)
-
FormPlayersStats.lfm (modified) (5 diffs)
-
FormServer.lfm (modified) (5 diffs)
-
FormSettings.lfm (modified) (15 diffs)
-
FormUnitMoves.lfm (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Forms/FormCharts.lfm
r362 r364 1 1 object FormCharts: TFormCharts 2 2 Left = 411 3 Height = 5 863 Height = 592 4 4 Top = 146 5 Width = 7 875 Width = 798 6 6 Caption = 'Charts' 7 ClientHeight = 586 8 ClientWidth = 787 9 DesignTimePPI = 120 7 ClientHeight = 592 8 ClientWidth = 798 9 Constraints.MinHeight = 120 10 Constraints.MinWidth = 120 11 DesignTimePPI = 144 10 12 OnShow = FormShow 11 13 LCLVersion = '3.6.0.0' 12 14 object Chart1: TChart 13 Left = 814 Height = 4 8815 Top = 4816 Width = 7 7515 Left = 10 16 Height = 474 17 Top = 58 18 Width = 783 17 19 AxisList = < 18 20 item … … 38 40 end 39 41 object ComboBox1: TComboBox 40 Left = 2 441 Height = 2842 Top = 843 Width = 39244 ItemHeight = 2042 Left = 29 43 Height = 38 44 Top = 10 45 Width = 470 46 ItemHeight = 0 45 47 ItemIndex = 0 46 48 Items.Strings = ( … … 56 58 end 57 59 object ButtonClose: TButton 58 Left = 680 59 Height = 31 60 Top = 544 61 Width = 94 60 Left = 670 61 Height = 37 62 Top = 542 63 Width = 113 64 Anchors = [akRight, akBottom] 62 65 Caption = 'Close' 63 66 ModalResult = 11 -
trunk/Forms/FormChat.lfm
r325 r364 1 1 object FormChat: TFormChat 2 2 Left = 1060 3 Height = 3 684 Top = 5 365 Width = 4 393 Height = 382 4 Top = 522 5 Width = 488 6 6 Caption = 'Chat' 7 ClientHeight = 3 688 ClientWidth = 4 397 ClientHeight = 382 8 ClientWidth = 488 9 9 DesignTimePPI = 144 10 LCLVersion = '3. 4.0.0'10 LCLVersion = '3.6.0.0' 11 11 object MemoChat: TMemo 12 12 Left = 8 13 Height = 2 8013 Height = 294 14 14 Top = 32 15 Width = 4 2115 Width = 470 16 16 Anchors = [akTop, akLeft, akRight, akBottom] 17 17 ParentFont = False … … 23 23 Left = 8 24 24 Height = 43 25 Top = 3 1826 Width = 3 2025 Top = 332 26 Width = 369 27 27 Anchors = [akLeft, akRight, akBottom] 28 28 ParentFont = False … … 31 31 end 32 32 object ButtonMessageSend: TButton 33 Left = 3 3633 Left = 385 34 34 Height = 38 35 Top = 3 2035 Top = 334 36 36 Width = 94 37 37 Anchors = [akRight, akBottom] -
trunk/Forms/FormClient.lfm
r335 r364 1 1 object FormClient: TFormClient 2 Left = 8 822 Left = 877 3 3 Height = 621 4 Top = 39 94 Top = 394 5 5 Width = 775 6 6 Caption = 'Client' … … 13 13 OnKeyUp = FormKeyUp 14 14 OnShow = FormShow 15 LCLVersion = '3. 4.0.0'15 LCLVersion = '3.6.0.0' 16 16 WindowState = wsMaximized 17 17 object StatusBar1: TStatusBar -
trunk/Forms/FormHelp.lfm
r362 r364 1 1 object FormHelp: TFormHelp 2 2 Left = 514 3 Height = 3603 Height = 445 4 4 Top = 267 5 Width = 4855 Width = 607 6 6 Caption = 'Help' 7 ClientHeight = 3608 ClientWidth = 4859 Constraints.MinHeight = 1 0010 Constraints.MinWidth = 1 0011 DesignTimePPI = 1 207 ClientHeight = 445 8 ClientWidth = 607 9 Constraints.MinHeight = 120 10 Constraints.MinWidth = 120 11 DesignTimePPI = 144 12 12 OnCreate = FormCreate 13 13 Position = poMainFormCenter 14 14 LCLVersion = '3.6.0.0' 15 15 object Memo1: TMemo 16 Left = 817 Height = 3 0418 Top = 819 Width = 46916 Left = 10 17 Height = 379 18 Top = 10 19 Width = 587 20 20 Align = alTop 21 21 Anchors = [akTop, akLeft, akRight, akBottom] 22 BorderSpacing.Around = 822 BorderSpacing.Around = 10 23 23 ReadOnly = True 24 24 ScrollBars = ssAutoBoth … … 26 26 end 27 27 object ButtonClose: TButton 28 Left = 38329 Height = 3 130 Top = 3 2031 Width = 9428 Left = 484 29 Height = 37 30 Top = 397 31 Width = 113 32 32 Anchors = [akRight, akBottom] 33 33 Caption = 'Close' -
trunk/Forms/FormMain.lfm
r337 r364 1 1 object FormMain: TFormMain 2 2 Left = 534 3 Height = 9 933 Height = 959 4 4 Top = 223 5 5 Width = 1491 6 6 Caption = 'xTactics' 7 ClientHeight = 9 937 ClientHeight = 959 8 8 ClientWidth = 1491 9 9 DesignTimePPI = 144 … … 16 16 OnResize = FormResize 17 17 OnShow = FormShow 18 LCLVersion = '3. 4.0.0'18 LCLVersion = '3.6.0.0' 19 19 object ToolBar1: TToolBar 20 20 Left = 0 … … 46 46 end 47 47 object ToolButton5: TToolButton 48 Left = 1 7148 Left = 189 49 49 Top = 2 50 50 Action = Core.ASettings 51 51 end 52 52 object ToolButton9: TToolButton 53 Left = 1 6653 Left = 184 54 54 Height = 32 55 55 Top = 2 … … 60 60 Top = 2 61 61 Action = Core.AGameLoad 62 DropdownMenu = PopupMenuOpenRecent 63 Style = tbsDropDown 62 64 end 63 65 object ToolButton12: TToolButton 64 Left = 1 3466 Left = 152 65 67 Top = 2 66 68 Action = Core.AGameSave 67 69 end 68 70 object ToolButton13: TToolButton 69 Left = 2 0371 Left = 221 70 72 Top = 2 71 73 Action = Core.AExit … … 77 79 Style = tbsDivider 78 80 end 81 object ToolButton6: TToolButton 82 Left = 253 83 Top = 2 84 Action = Core.APlayersStats 85 end 86 object ToolButton7: TToolButton 87 Left = 285 88 Top = 2 89 Action = Core.AShowUnitMoves 90 end 91 object ToolButton8: TToolButton 92 Left = 317 93 Top = 2 94 Action = Core.AShowCharts 95 end 79 96 end 80 97 object PanelMain: TPanel 81 98 Left = 0 82 Height = 9 5399 Height = 919 83 100 Top = 40 84 101 Width = 1491 … … 254 271 end 255 272 end 273 object PopupMenuOpenRecent: TPopupMenu 274 Left = 448 275 Top = 251 276 end 256 277 end -
trunk/Forms/FormMain.pas
r354 r364 64 64 MenuItem9: TMenuItem; 65 65 PanelMain: TPanel; 66 PopupMenuOpenRecent: TPopupMenu; 66 67 PopupMenuToolbar: TPopupMenu; 67 68 Separator1: TMenuItem; … … 76 77 ToolButton4: TToolButton; 77 78 ToolButton5: TToolButton; 79 ToolButton6: TToolButton; 80 ToolButton7: TToolButton; 81 ToolButton8: TToolButton; 78 82 ToolButton9: TToolButton; 79 83 procedure AMapGridVisibleExecute(Sender: TObject); -
trunk/Forms/FormNew.lfm
r363 r364 1 1 object FormNew: TFormNew 2 2 Left = 412 3 Height = 6623 Height = 794 4 4 Top = 155 5 Width = 1 0155 Width = 1218 6 6 Caption = 'New game' 7 ClientHeight = 6628 ClientWidth = 1 0159 Constraints.MinHeight = 41810 Constraints.MinWidth = 55611 DesignTimePPI = 1 207 ClientHeight = 794 8 ClientWidth = 1218 9 Constraints.MinHeight = 502 10 Constraints.MinWidth = 667 11 DesignTimePPI = 144 12 12 OnCreate = FormCreate 13 13 OnDestroy = FormDestroy … … 16 16 LCLVersion = '3.6.0.0' 17 17 object PageControl1: TPageControl 18 Left = 319 Height = 56420 Top = 5021 Width = 67818 Left = 4 19 Height = 676 20 Top = 60 21 Width = 813 22 22 ActivePage = TabSheetMap 23 23 Align = alClient 24 BorderSpacing.Around = 324 BorderSpacing.Around = 4 25 25 ParentFont = False 26 26 TabIndex = 2 … … 29 29 object TabSheetMode: TTabSheet 30 30 Caption = 'Mode' 31 ClientHeight = 53132 ClientWidth = 67031 ClientHeight = 636 32 ClientWidth = 803 33 33 ParentFont = False 34 34 object Panel3: TPanel 35 35 Left = 0 36 Height = 53136 Height = 636 37 37 Top = 0 38 Width = 67038 Width = 803 39 39 Align = alClient 40 40 BevelOuter = bvNone 41 ClientHeight = 53142 ClientWidth = 67041 ClientHeight = 636 42 ClientWidth = 803 43 43 ParentFont = False 44 44 TabOrder = 0 45 45 object RadioButtonModeLocal: TRadioButton 46 Left = 847 Height = 2448 Top = 1 249 Width = 5646 Left = 10 47 Height = 30 48 Top = 14 49 Width = 70 50 50 Caption = 'Local' 51 51 Checked = True … … 56 56 end 57 57 object RadioButtonModeNetworkServer: TRadioButton 58 Left = 859 Height = 2460 Top = 4 061 Width = 1 2058 Left = 10 59 Height = 30 60 Top = 48 61 Width = 155 62 62 Caption = 'Network server' 63 63 ParentFont = False … … 66 66 end 67 67 object RadioButtonModeNetworkClient: TRadioButton 68 Left = 869 Height = 2470 Top = 1 3371 Width = 1 1768 Left = 10 69 Height = 30 70 Top = 160 71 Width = 149 72 72 Caption = 'Network client' 73 73 ParentFont = False … … 76 76 end 77 77 object EditServerAddress: TEdit 78 Left = 2 079 Height = 2880 Top = 9381 Width = 18378 Left = 24 79 Height = 43 80 Top = 112 81 Width = 220 82 82 ParentFont = False 83 83 TabOrder = 3 84 84 end 85 85 object SpinEditServerPort: TSpinEdit 86 Left = 2 1387 Height = 2888 Top = 9389 Width = 6686 Left = 256 87 Height = 43 88 Top = 112 89 Width = 79 90 90 MaxValue = 65535 91 91 ParentFont = False … … 93 93 end 94 94 object Label11: TLabel 95 Left = 2 1396 Height = 2 097 Top = 6798 Width = 2995 Left = 256 96 Height = 26 97 Top = 80 98 Width = 40 99 99 Caption = 'Port:' 100 100 ParentColor = False … … 102 102 end 103 103 object Label12: TLabel 104 Left = 2 0105 Height = 2 0106 Top = 67107 Width = 56104 Left = 24 105 Height = 26 106 Top = 80 107 Width = 74 108 108 Caption = 'Address:' 109 109 ParentColor = False … … 111 111 end 112 112 object ListViewServers: TListView 113 Left = 2 2114 Height = 3 20115 Top = 167116 Width = 278113 Left = 26 114 Height = 383 115 Top = 200 116 Width = 334 117 117 Anchors = [akTop, akLeft, akBottom] 118 118 Columns = < 119 119 item 120 120 Caption = 'Name' 121 Width = 83121 Width = 100 122 122 end 123 123 item 124 124 Caption = 'Address' 125 Width = 182125 Width = 219 126 126 end> 127 127 MultiSelect = True … … 139 139 end 140 140 object Button1: TButton 141 Left = 2 2142 Height = 3 2143 Top = 493144 Width = 78141 Left = 26 142 Height = 38 143 Top = 591 144 Width = 94 145 145 Action = AServerAdd 146 146 Anchors = [akLeft, akBottom] … … 149 149 end 150 150 object Button2: TButton 151 Left = 2 07152 Height = 3 2153 Top = 493154 Width = 78151 Left = 248 152 Height = 38 153 Top = 591 154 Width = 94 155 155 Action = AServerRemove 156 156 Anchors = [akLeft, akBottom] … … 159 159 end 160 160 object Button3: TButton 161 Left = 1 13162 Height = 3 2163 Top = 493164 Width = 78161 Left = 136 162 Height = 38 163 Top = 591 164 Width = 94 165 165 Action = AServerModify 166 166 Anchors = [akLeft, akBottom] … … 172 172 object TabSheetPlayers: TTabSheet 173 173 Caption = 'Players' 174 ClientHeight = 531175 ClientWidth = 670174 ClientHeight = 636 175 ClientWidth = 803 176 176 ParentFont = False 177 177 object Panel2: TPanel 178 178 Left = 0 179 Height = 531179 Height = 636 180 180 Top = 0 181 Width = 670181 Width = 803 182 182 Align = alClient 183 183 BevelOuter = bvNone … … 188 188 object TabSheetMap: TTabSheet 189 189 Caption = 'Map' 190 ClientHeight = 531191 ClientWidth = 670190 ClientHeight = 636 191 ClientWidth = 803 192 192 OnShow = TabSheetMapShow 193 193 ParentFont = False 194 194 object Panel1: TPanel 195 195 Left = 0 196 Height = 531196 Height = 636 197 197 Top = 0 198 Width = 670198 Width = 803 199 199 Align = alClient 200 200 BevelOuter = bvNone 201 ClientHeight = 531202 ClientWidth = 670201 ClientHeight = 636 202 ClientWidth = 803 203 203 ParentFont = False 204 204 TabOrder = 0 205 205 object Label1: TLabel 206 Left = 7207 Height = 2 0208 Top = 8209 Width = 74206 Left = 8 207 Height = 26 208 Top = 10 209 Width = 94 210 210 Caption = 'Map width:' 211 211 ParentColor = False … … 213 213 end 214 214 object Label2: TLabel 215 Left = 7216 Height = 2 0217 Top = 48218 Width = 79215 Left = 8 216 Height = 26 217 Top = 58 218 Width = 101 219 219 Caption = 'Map height:' 220 220 ParentColor = False … … 222 222 end 223 223 object SpinEditMapSizeX: TSpinEdit 224 Left = 1 07225 Height = 28226 Top = 3227 Width = 82224 Left = 128 225 Height = 43 226 Top = 4 227 Width = 98 228 228 MinValue = 2 229 229 OnChange = SpinEditMapSizeXChange … … 233 233 end 234 234 object SpinEditMapSizeY: TSpinEdit 235 Left = 1 07236 Height = 28237 Top = 46238 Width = 82235 Left = 128 236 Height = 43 237 Top = 55 238 Width = 98 239 239 MinValue = 2 240 240 OnChange = SpinEditMapSizeYChange … … 244 244 end 245 245 object TrackBarSizeX: TTrackBar 246 Left = 2 00247 Height = 48248 Top = 7249 Width = 461246 Left = 240 247 Height = 58 248 Top = 8 249 Width = 552 250 250 Max = 100 251 251 Min = 2 … … 258 258 end 259 259 object TrackBarSizeY: TTrackBar 260 Left = 2 00261 Height = 48262 Top = 4 1263 Width = 461260 Left = 240 261 Height = 58 262 Top = 49 263 Width = 552 264 264 Max = 100 265 265 Min = 2 … … 272 272 end 273 273 object Label5: TLabel 274 Left = 7275 Height = 2 0276 Top = 87277 Width = 64274 Left = 8 275 Height = 26 276 Top = 106 277 Width = 82 278 278 Caption = 'Grid type:' 279 279 ParentColor = False … … 281 281 end 282 282 object ComboBoxGridType: TComboBox 283 Left = 1 22284 Height = 28285 Top = 87286 Width = 253287 ItemHeight = 20283 Left = 146 284 Height = 38 285 Top = 104 286 Width = 304 287 ItemHeight = 0 288 288 Items.Strings = ( 289 289 'Hexagon vertical' … … 300 300 end 301 301 object ComboBoxMapShape: TComboBox 302 Left = 1 22303 Height = 28304 Top = 1 20305 Width = 253306 ItemHeight = 20302 Left = 146 303 Height = 38 304 Top = 144 305 Width = 304 306 ItemHeight = 0 307 307 Items.Strings = ( 308 308 'Hexagonal' … … 316 316 end 317 317 object Label8: TLabel 318 Left = 7319 Height = 2 0320 Top = 1 20321 Width = 76318 Left = 8 319 Height = 26 320 Top = 148 321 Width = 98 322 322 Caption = 'Map shape:' 323 323 ParentColor = False … … 325 325 end 326 326 object CheckBoxSymetricMap: TCheckBox 327 Left = 7328 Height = 24329 Top = 2 07330 Width = 1 12327 Left = 8 328 Height = 30 329 Top = 248 330 Width = 142 331 331 Caption = 'Symetric map' 332 332 ParentFont = False … … 335 335 end 336 336 object SpinEditVoidPercent: TSpinEdit 337 Left = 180338 Height = 28339 Top = 262340 Width = 88337 Left = 216 338 Height = 43 339 Top = 314 340 Width = 106 341 341 MinValue = 1 342 342 OnChange = SpinEditVoidPercentChange … … 346 346 end 347 347 object CheckBoxVoid: TCheckBox 348 Left = 7349 Height = 24350 Top = 265351 Width = 1 46348 Left = 8 349 Height = 30 350 Top = 320 351 Width = 189 352 352 Caption = 'Inaccessible places' 353 353 ParentFont = False … … 356 356 end 357 357 object CheckBoxCity: TCheckBox 358 Left = 7359 Height = 24360 Top = 3 07361 Width = 57358 Left = 8 359 Height = 30 360 Top = 366 361 Width = 72 362 362 Caption = 'Cities' 363 363 ParentFont = False … … 366 366 end 367 367 object SpinEditCityPercent: TSpinEdit 368 Left = 180369 Height = 28370 Top = 3 00371 Width = 88368 Left = 216 369 Height = 43 370 Top = 360 371 Width = 106 372 372 MinValue = 1 373 373 OnChange = SpinEditCityPercentChange … … 377 377 end 378 378 object Label4: TLabel 379 Left = 276380 Height = 2 0381 Top = 3 07382 Width = 1 2379 Left = 331 380 Height = 26 381 Top = 366 382 Width = 15 383 383 Caption = '%' 384 384 ParentColor = False … … 386 386 end 387 387 object Label3: TLabel 388 Left = 276389 Height = 2 0390 Top = 270391 Width = 1 2388 Left = 331 389 Height = 26 390 Top = 320 391 Width = 15 392 392 Caption = '%' 393 393 ParentColor = False … … 395 395 end 396 396 object SpinEditNeutralUnits: TSpinEdit 397 Left = 260398 Height = 28399 Top = 4 07400 Width = 82397 Left = 312 398 Height = 43 399 Top = 488 400 Width = 98 401 401 MaxValue = 99 402 402 OnChange = SpinEditNeutralUnitsChange … … 406 406 end 407 407 object Label7: TLabel 408 Left = 7409 Height = 2 0410 Top = 4 13411 Width = 172408 Left = 8 409 Height = 26 410 Top = 496 411 Width = 225 412 412 Caption = 'Max random neutral units:' 413 413 ParentColor = False … … 415 415 end 416 416 object EditImageFile: TEdit 417 Left = 1 20418 Height = 28419 Top = 1 53420 Width = 447417 Left = 146 418 Height = 43 419 Top = 184 420 Width = 533 421 421 Anchors = [akTop, akLeft, akRight] 422 422 ParentFont = False … … 425 425 end 426 426 object ButtonImageBrowse: TButton 427 Left = 574428 Height = 32429 Top = 1 52430 Width = 82427 Left = 688 428 Height = 43 429 Top = 184 430 Width = 98 431 431 Anchors = [akTop, akRight] 432 432 Caption = 'Browse' … … 436 436 end 437 437 object Label9: TLabel 438 Left = 7439 Height = 2 0440 Top = 1 53441 Width = 70438 Left = 8 439 Height = 26 440 Top = 192 441 Width = 90 442 442 Caption = 'Image file:' 443 443 ParentColor = False … … 445 445 end 446 446 object CheckBoxBridges: TCheckBox 447 Left = 7448 Height = 24449 Top = 340450 Width = 165447 Left = 8 448 Height = 30 449 Top = 408 450 Width = 211 451 451 Caption = 'Bridges between cells' 452 452 ParentFont = False … … 455 455 end 456 456 object SpinEditMaxPower: TSpinEdit 457 Left = 260458 Height = 28459 Top = 367460 Width = 82457 Left = 312 458 Height = 43 459 Top = 440 460 Width = 98 461 461 MaxValue = 1000000 462 462 MinValue = 1 … … 467 467 end 468 468 object Label10: TLabel 469 Left = 7470 Height = 2 0471 Top = 373472 Width = 1 19469 Left = 8 470 Height = 26 471 Top = 448 472 Width = 155 473 473 Caption = 'Max units per cell:' 474 474 ParentColor = False … … 476 476 end 477 477 object CheckBoxCyclicMap: TCheckBox 478 Left = 7479 Height = 24480 Top = 2 36481 Width = 93478 Left = 8 479 Height = 30 480 Top = 283 481 Width = 117 482 482 Caption = 'Cyclic map' 483 483 ParentFont = False … … 486 486 end 487 487 object Image1: TImage 488 Left = 349489 Height = 3 01490 Top = 2 27491 Width = 3 13488 Left = 419 489 Height = 360 490 Top = 272 491 Width = 374 492 492 Anchors = [akTop, akLeft, akRight, akBottom] 493 493 OnResize = Image1Resize 494 494 end 495 495 object Label15: TLabel 496 Left = 349497 Height = 2 0498 Top = 2 00499 Width = 54496 Left = 419 497 Height = 26 498 Top = 240 499 Width = 71 500 500 Caption = 'Preview:' 501 501 ParentColor = False … … 503 503 end 504 504 object ButtonRandomize: TButton 505 Left = 8506 Height = 3 2507 Top = 450508 Width = 1 28505 Left = 10 506 Height = 38 507 Top = 540 508 Width = 154 509 509 Caption = 'Randomize' 510 510 ParentFont = False … … 516 516 object TabSheetRules: TTabSheet 517 517 Caption = 'Rules' 518 ClientHeight = 531519 ClientWidth = 670518 ClientHeight = 636 519 ClientWidth = 803 520 520 ParentFont = False 521 521 object Panel4: TPanel 522 522 Left = 0 523 Height = 531523 Height = 636 524 524 Top = 0 525 Width = 670525 Width = 803 526 526 Align = alClient 527 527 BevelOuter = bvNone 528 ClientHeight = 531529 ClientWidth = 670528 ClientHeight = 636 529 ClientWidth = 803 530 530 ParentFont = False 531 531 TabOrder = 0 532 532 object RadioGroupGrowCells: TRadioGroup 533 Left = 1 2534 Height = 1 07535 Top = 1 00536 Width = 260533 Left = 14 534 Height = 128 535 Top = 120 536 Width = 312 537 537 AutoFill = True 538 538 Caption = 'Growing cells' … … 544 544 ChildSizing.Layout = cclLeftToRightThenTopToBottom 545 545 ChildSizing.ControlsPerLine = 1 546 ClientHeight = 82547 ClientWidth = 256546 ClientHeight = 101 547 ClientWidth = 310 548 548 Items.Strings = ( 549 549 'None' … … 555 555 end 556 556 object Label6: TLabel 557 Left = 7558 Height = 2 0559 Top = 2 22560 Width = 94557 Left = 8 558 Height = 26 559 Top = 266 560 Width = 119 561 561 Caption = 'Win objective:' 562 562 ParentColor = False … … 564 564 end 565 565 object ComboBoxWinObjective: TComboBox 566 Left = 180567 Height = 28568 Top = 2 22569 Width = 273570 ItemHeight = 20566 Left = 216 567 Height = 38 568 Top = 266 569 Width = 328 570 ItemHeight = 0 571 571 Items.Strings = ( 572 572 'Defeat all oponents' … … 581 581 end 582 582 object RadioGroupGrowAmount: TRadioGroup 583 Left = 1 2584 Height = 77585 Top = 1 3586 Width = 254583 Left = 14 584 Height = 92 585 Top = 16 586 Width = 305 587 587 AutoFill = True 588 588 Caption = 'Per turn grow amount' … … 594 594 ChildSizing.Layout = cclLeftToRightThenTopToBottom 595 595 ChildSizing.ControlsPerLine = 1 596 ClientHeight = 52597 ClientWidth = 250596 ClientHeight = 65 597 ClientWidth = 303 598 598 Items.Strings = ( 599 599 'By one' … … 604 604 end 605 605 object CheckBoxFogOfWar: TCheckBox 606 Left = 280607 Height = 24608 Top = 2 0609 Width = 92606 Left = 336 607 Height = 30 608 Top = 24 609 Width = 115 610 610 Caption = 'Fog of war' 611 611 ParentFont = False … … 613 613 end 614 614 object PageControlWinObjective: TPageControl 615 Left = 1 0616 Height = 92617 Top = 262618 Width = 651615 Left = 12 616 Height = 110 617 Top = 314 618 Width = 780 619 619 ActivePage = TabSheetCaptureEntireMap 620 620 Anchors = [akTop, akLeft, akRight] … … 630 630 end 631 631 object TabSheetCaptureCells: TTabSheet 632 ClientHeight = 84633 ClientWidth = 643632 ClientHeight = 67 633 ClientWidth = 770 634 634 ParentFont = False 635 635 object Label14: TLabel 636 Left = 7637 Height = 2 0638 Top = 1 3639 Width = 1 25636 Left = 8 637 Height = 26 638 Top = 16 639 Width = 161 640 640 Caption = 'Special cells count:' 641 641 ParentColor = False … … 643 643 end 644 644 object SpinEditSpecialCells: TSpinEdit 645 Left = 197646 Height = 28647 Top = 7648 Width = 1 32645 Left = 236 646 Height = 43 647 Top = 8 648 Width = 158 649 649 MaxValue = 1000 650 650 MinValue = 1 … … 655 655 end 656 656 object TabSheetStayAliveTurns: TTabSheet 657 ClientHeight = 84658 ClientWidth = 643657 ClientHeight = 67 658 ClientWidth = 770 659 659 ParentFont = False 660 660 object Label13: TLabel 661 Left = 7662 Height = 2 0663 Top = 1 3664 Width = 1 11661 Left = 8 662 Height = 26 663 Top = 16 664 Width = 146 665 665 Caption = 'Number of turns:' 666 666 ParentColor = False … … 668 668 end 669 669 object SpinEditTurns: TSpinEdit 670 Left = 197671 Height = 28672 Top = 7673 Width = 1 32670 Left = 236 671 Height = 43 672 Top = 8 673 Width = 158 674 674 MaxValue = 1000 675 675 MinValue = 1 … … 691 691 object PanelButtons: TPanel 692 692 Left = 0 693 Height = 45694 Top = 617695 Width = 1 015693 Height = 54 694 Top = 740 695 Width = 1218 696 696 Align = alBottom 697 697 BevelOuter = bvNone 698 ClientHeight = 45699 ClientWidth = 1 015698 ClientHeight = 54 699 ClientWidth = 1218 700 700 ParentFont = False 701 701 TabOrder = 1 702 702 object ButtonOk: TButton 703 Left = 915704 Height = 3 2705 Top = 6706 Width = 88703 Left = 1098 704 Height = 38 705 Top = 8 706 Width = 106 707 707 Anchors = [akRight, akBottom] 708 708 Caption = 'Ok' … … 713 713 end 714 714 object ButtonCancel: TButton 715 Left = 806716 Height = 3 2717 Top = 6718 Width = 95715 Left = 967 716 Height = 38 717 Top = 8 718 Width = 114 719 719 Anchors = [akRight, akBottom] 720 720 Caption = 'Cancel' … … 725 725 end 726 726 object PanelChat: TPanel 727 Left = 689728 Height = 570729 Top = 47730 Width = 3 26727 Left = 827 728 Height = 684 729 Top = 56 730 Width = 391 731 731 Align = alRight 732 732 BevelOuter = bvNone … … 735 735 end 736 736 object Splitter1: TSplitter 737 Left = 684738 Height = 570739 Top = 47740 Width = 5737 Left = 821 738 Height = 684 739 Top = 56 740 Width = 6 741 741 Align = alRight 742 742 ResizeAnchor = akRight … … 744 744 object Panel5: TPanel 745 745 Left = 0 746 Height = 47746 Height = 56 747 747 Top = 0 748 Width = 1 015748 Width = 1218 749 749 Align = alTop 750 750 BevelOuter = bvNone 751 ClientHeight = 47752 ClientWidth = 1 015751 ClientHeight = 56 752 ClientWidth = 1218 753 753 ParentFont = False 754 754 TabOrder = 4 755 755 object Label16: TLabel 756 Left = 1 0757 Height = 2 0758 Top = 1 2759 Width = 91756 Left = 12 757 Height = 26 758 Top = 14 759 Width = 120 760 760 Caption = 'Game system:' 761 761 ParentColor = False … … 763 763 end 764 764 object ComboBoxGameSystem: TComboBox 765 Left = 1 47766 Height = 28767 Top = 1 0768 Width = 2 12769 ItemHeight = 20765 Left = 176 766 Height = 42 767 Top = 12 768 Width = 254 769 ItemHeight = 0 770 770 ParentFont = False 771 771 Style = csDropDownList … … 774 774 end 775 775 object ButtonGameSystems: TButton 776 Left = 369777 Height = 3 2778 Top = 8779 Width = 94776 Left = 443 777 Height = 38 778 Top = 10 779 Width = 113 780 780 Caption = 'Manage' 781 781 ParentFont = False … … 786 786 object ActionList1: TActionList 787 787 Images = Core.ImageListSmall 788 Left = 720789 Top = 180788 Left = 864 789 Top = 216 790 790 object AServerAdd: TAction 791 791 Caption = 'Add' … … 802 802 end 803 803 object OpenPictureDialog1: TOpenPictureDialog 804 Left = 720805 Top = 3 00804 Left = 864 805 Top = 360 806 806 end 807 807 object PopupMenuServers: TPopupMenu 808 Left = 720809 Top = 1 13808 Left = 864 809 Top = 136 810 810 object MenuItem4: TMenuItem 811 811 Action = AServerAdd … … 821 821 Interval = 500 822 822 OnTimer = TimerMapPreviewTimer 823 Left = 720824 Top = 372823 Left = 864 824 Top = 446 825 825 end 826 826 end -
trunk/Forms/FormPlayersStats.lfm
r362 r364 1 1 object FormPlayersStats: TFormPlayersStats 2 2 Left = 689 3 Height = 2493 Height = 308 4 4 Top = 437 5 Width = 5985 Width = 737 6 6 Caption = 'Players stats' 7 ClientHeight = 2498 ClientWidth = 5989 Constraints.MinHeight = 1 0010 Constraints.MinWidth = 1 0011 DesignTimePPI = 1 207 ClientHeight = 308 8 ClientWidth = 737 9 Constraints.MinHeight = 120 10 Constraints.MinWidth = 120 11 DesignTimePPI = 144 12 12 OnShow = FormShow 13 13 LCLVersion = '3.6.0.0' 14 14 object ListView1: TListView 15 Left = 816 Height = 19117 Top = 818 Width = 58215 Left = 10 16 Height = 247 17 Top = 10 18 Width = 717 19 19 Align = alTop 20 20 Anchors = [akTop, akLeft, akRight, akBottom] 21 BorderSpacing.Around = 821 BorderSpacing.Around = 10 22 22 Columns = < 23 23 item 24 24 Caption = 'Name' 25 Width = 1 0025 Width = 120 26 26 end 27 27 item 28 28 Caption = 'Mode' 29 Width = 1 0029 Width = 120 30 30 end 31 31 item 32 32 Caption = 'Cells' 33 Width = 1 0033 Width = 120 34 34 end 35 35 item 36 36 Caption = 'Discovered' 37 Width = 1 0037 Width = 120 38 38 end 39 39 item 40 40 Caption = 'Cities' 41 Width = 1 0041 Width = 120 42 42 end 43 43 item 44 44 Caption = 'Units' 45 Width = 1 0045 Width = 120 46 46 end 47 47 item 48 48 Caption = 'Win objective cells' 49 Width = 1 2549 Width = 150 50 50 end> 51 51 OwnerData = True … … 58 58 end 59 59 object ButtonClose: TButton 60 Left = 49661 Height = 3 162 Top = 2 0763 Width = 9460 Left = 614 61 Height = 37 62 Top = 265 63 Width = 113 64 64 Anchors = [akRight, akBottom] 65 65 Caption = 'Close' … … 68 68 end 69 69 object PopupMenu1: TPopupMenu 70 Left = 1 4371 Top = 1 1070 Left = 172 71 Top = 132 72 72 object MenuItem1: TMenuItem 73 73 Action = ASpectate … … 75 75 end 76 76 object ActionList1: TActionList 77 Left = 37378 Top = 1 1377 Left = 448 78 Top = 136 79 79 object ASpectate: TAction 80 80 Caption = 'Spectate' … … 88 88 Column = 0 89 89 Order = soNone 90 Left = 54491 Top = 1 1090 Left = 653 91 Top = 132 92 92 end 93 93 end -
trunk/Forms/FormServer.lfm
r325 r364 1 1 object FormServer: TFormServer 2 2 Left = 647 3 Height = 3033 Height = 284 4 4 Top = 439 5 Width = 6275 Width = 596 6 6 Caption = 'Server' 7 ClientHeight = 3038 ClientWidth = 6277 ClientHeight = 284 8 ClientWidth = 596 9 9 DesignTimePPI = 144 10 LCLVersion = '3. 4.0.0'10 LCLVersion = '3.6.0.0' 11 11 object ButtonCancel: TButton 12 Left = 3 6212 Left = 331 13 13 Height = 38 14 Top = 2 6014 Top = 241 15 15 Width = 113 16 16 Anchors = [akRight, akBottom] … … 21 21 end 22 22 object ButtonOk: TButton 23 Left = 4 9723 Left = 466 24 24 Height = 38 25 Top = 2 6025 Top = 241 26 26 Width = 113 27 27 Anchors = [akRight, akBottom] … … 34 34 object ScrollBox1: TScrollBox 35 35 Left = 8 36 Height = 2 4636 Height = 227 37 37 Top = 8 38 Width = 61038 Width = 579 39 39 HorzScrollBar.Page = 279 40 40 VertScrollBar.Page = 155 41 41 Anchors = [akTop, akLeft, akRight, akBottom] 42 ClientHeight = 2 4443 ClientWidth = 60842 ClientHeight = 225 43 ClientWidth = 577 44 44 TabOrder = 2 45 45 object Label1: TLabel … … 56 56 Height = 43 57 57 Top = 17 58 Width = 4 3158 Width = 400 59 59 Anchors = [akTop, akLeft, akRight] 60 60 ParentFont = False … … 65 65 Height = 43 66 66 Top = 64 67 Width = 4 3167 Width = 400 68 68 Anchors = [akTop, akLeft, akRight] 69 69 ParentFont = False -
trunk/Forms/FormSettings.lfm
r354 r364 8 8 ClientHeight = 613 9 9 ClientWidth = 857 10 Constraints.MinHeight = 30011 Constraints.MinWidth = 45410 Constraints.MinHeight = 200 11 Constraints.MinWidth = 300 12 12 DesignTimePPI = 144 13 13 OnCreate = FormCreate … … 51 51 object TabSheetGeneral: TTabSheet 52 52 Caption = 'General' 53 ClientHeight = 5 0654 ClientWidth = 83 553 ClientHeight = 512 54 ClientWidth = 831 55 55 ParentFont = False 56 56 object Panel1: TPanel 57 57 Left = 0 58 Height = 5 0658 Height = 512 59 59 Top = 0 60 Width = 83 560 Width = 831 61 61 Align = alClient 62 62 BevelOuter = bvNone 63 ClientHeight = 5 0664 ClientWidth = 83 563 ClientHeight = 512 64 ClientWidth = 831 65 65 ParentFont = False 66 66 TabOrder = 0 67 67 object Label1: TLabel 68 68 Left = 20 69 Height = 2 869 Height = 26 70 70 Top = 32 71 Width = 9671 Width = 88 72 72 Caption = 'Language:' 73 73 ParentColor = False … … 76 76 object ComboBoxLanguage: TComboBox 77 77 Left = 178 78 Height = 4 078 Height = 42 79 79 Top = 24 80 80 Width = 196 … … 86 86 object ComboBoxTheme: TComboBox 87 87 Left = 176 88 Height = 4 088 Height = 42 89 89 Top = 72 90 90 Width = 196 … … 96 96 object Label6: TLabel 97 97 Left = 20 98 Height = 2 898 Height = 26 99 99 Top = 80 100 Width = 6 9100 Width = 63 101 101 Caption = 'Theme:' 102 102 ParentColor = False … … 105 105 object SpinEditAnimSpeed: TSpinEdit 106 106 Left = 232 107 Height = 38107 Height = 43 108 108 Top = 120 109 109 Width = 122 … … 113 113 object Label3: TLabel 114 114 Left = 368 115 Height = 2 8116 Top = 12 4117 Width = 1 7115 Height = 26 116 Top = 128 117 Width = 15 118 118 Caption = '%' 119 119 ParentColor = False … … 122 122 object Label2: TLabel 123 123 Left = 20 124 Height = 2 8125 Top = 12 0126 Width = 1 62124 Height = 26 125 Top = 128 126 Width = 149 127 127 Caption = 'Animation speed:' 128 128 ParentColor = False … … 133 133 object TabSheetDebug: TTabSheet 134 134 Caption = 'Debug' 135 ClientHeight = 5 06136 ClientWidth = 83 5135 ClientHeight = 512 136 ClientWidth = 831 137 137 ParentFont = False 138 138 object Panel2: TPanel 139 139 Left = 0 140 Height = 5 06140 Height = 512 141 141 Top = 0 142 Width = 83 5142 Width = 831 143 143 Align = alClient 144 144 BevelOuter = bvNone 145 ClientHeight = 5 06146 ClientWidth = 83 5145 ClientHeight = 512 146 ClientWidth = 831 147 147 ParentFont = False 148 148 TabOrder = 0 … … 151 151 Height = 24 152 152 Top = 32 153 Width = 803153 Width = 799 154 154 Anchors = [akTop, akLeft, akRight] 155 155 AutoSize = False … … 161 161 object Label4: TLabel 162 162 Left = 14 163 Height = 2 8163 Height = 26 164 164 Top = 67 165 Width = 3 9165 Width = 35 166 166 Caption = 'DPI:' 167 167 ParentColor = False … … 170 170 object SpinEditX: TSpinEdit 171 171 Left = 104 172 Height = 38172 Height = 43 173 173 Top = 64 174 174 Width = 96 … … 181 181 object Label5: TLabel 182 182 Left = 208 183 Height = 2 8183 Height = 26 184 184 Top = 67 185 Width = 1 1185 Width = 10 186 186 Caption = 'x' 187 187 ParentColor = False … … 190 190 object SpinEditY: TSpinEdit 191 191 Left = 232 192 Height = 38192 Height = 43 193 193 Top = 64 194 194 Width = 90 … … 203 203 Height = 26 204 204 Top = 136 205 Width = 80 7205 Width = 803 206 206 Anchors = [akTop, akLeft, akRight] 207 207 AutoSize = False -
trunk/Forms/FormUnitMoves.lfm
r362 r364 1 1 object FormUnitMoves: TFormUnitMoves 2 2 Left = 879 3 Height = 2793 Height = 319 4 4 Top = 511 5 Width = 6605 Width = 748 6 6 Caption = 'Unit moves' 7 ClientHeight = 2798 ClientWidth = 6609 Constraints.MinHeight = 1 0010 Constraints.MinWidth = 1 0011 DesignTimePPI = 1 207 ClientHeight = 319 8 ClientWidth = 748 9 Constraints.MinHeight = 120 10 Constraints.MinWidth = 120 11 DesignTimePPI = 144 12 12 OnShow = FormShow 13 13 LCLVersion = '3.6.0.0' 14 14 object ListView1: TListView 15 Left = 816 Height = 2 2417 Top = 818 Width = 64415 Left = 10 16 Height = 254 17 Top = 10 18 Width = 728 19 19 Align = alTop 20 20 Anchors = [akTop, akLeft, akRight, akBottom] 21 BorderSpacing.Around = 821 BorderSpacing.Around = 10 22 22 Columns = < 23 23 item 24 24 Caption = 'From cell' 25 Width = 1 5025 Width = 180 26 26 end 27 27 item 28 28 Caption = 'To cell' 29 Width = 1 5029 Width = 180 30 30 end 31 31 item 32 32 Caption = 'Once count' 33 Width = 1 5033 Width = 180 34 34 end 35 35 item 36 36 Caption = 'Repeat count' 37 Width = 3 3237 Width = 398 38 38 end> 39 39 OwnerData = True … … 46 46 end 47 47 object ButtonClose: TButton 48 Left = 55849 Height = 3 150 Top = 2 4051 Width = 9448 Left = 625 49 Height = 37 50 Top = 272 51 Width = 113 52 52 Anchors = [akRight, akBottom] 53 53 Caption = 'Close'
Note:
See TracChangeset
for help on using the changeset viewer.
