object MainScreen: TMainScreen Left = 469 Height = 480 Top = 251 Width = 800 HorzScrollBar.Visible = False VertScrollBar.Visible = False Caption = 'C-evo' ClientHeight = 480 ClientWidth = 800 Color = clBtnFace Constraints.MinHeight = 480 Constraints.MinWidth = 800 DesignTimePPI = 144 Font.Color = clWindowText Font.Height = -20 Font.Name = 'MS Sans Serif' KeyPreview = True OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnKeyDown = FormKeyDown OnKeyUp = FormKeyUp OnMouseDown = FormMouseDown OnMouseMove = FormMouseMove OnMouseUp = FormMouseUp OnMouseWheel = FormMouseWheel OnPaint = FormPaint OnResize = FormResize OnShow = FormShow Position = poDefault LCLVersion = '2.2.0.4' Scaled = False WindowState = wsNormal object UnitBtn: TButtonB Tag = 14 Left = 208 Height = 25 Top = 384 Width = 25 Visible = False Down = False Permanent = False OnClick = PanelBtnClick ButtonIndex = 2 end object MapBtn0: TButtonC Tag = 51 Left = 16 Height = 12 Top = 304 Width = 12 Visible = False Down = False Permanent = False OnClick = MapBtnClick ButtonIndex = 2 end object MapBtn1: TButtonC Tag = 291 Left = 16 Height = 12 Top = 320 Width = 12 Visible = False Down = False Permanent = False OnClick = MapBtnClick ButtonIndex = 2 end object MapBtn4: TButtonC Tag = 1028 Left = 16 Height = 12 Top = 368 Width = 12 Visible = False Down = False Permanent = False OnDownChanged = GrWallBtnDownChanged ButtonIndex = 1 end object MapBtn5: TButtonC Tag = 1328 Left = 16 Height = 12 Top = 384 Width = 12 Visible = False Down = False Permanent = False OnClick = MapBtnClick ButtonIndex = 2 end object MapBtn6: TButtonC Tag = 1541 Left = 16 Height = 12 Top = 400 Width = 12 Visible = False Down = False Permanent = False OnDownChanged = BareBtnDownChanged ButtonIndex = 1 end object TerrainBtn: TButtonB Tag = 28 Left = 240 Height = 25 Top = 384 Width = 25 Visible = False Down = False Permanent = False OnClick = PanelBtnClick ButtonIndex = 3 end object UnitInfoBtn: TButtonB Tag = 15 Left = 176 Height = 25 Top = 384 Width = 25 Visible = False Down = False Permanent = False OnClick = UnitInfoBtnClick ButtonIndex = 7 end object EOT: TEOTButton Left = 712 Height = 48 Top = 368 Width = 48 Visible = False Down = False Permanent = False OnClick = EOTClick ButtonIndex = 0 end object MenuArea: TArea Left = 2 Height = 36 Top = 1 Width = 36 end object TreasuryArea: TArea Left = 208 Height = 36 Top = 1 Width = 164 end object ResearchArea: TArea Left = 384 Height = 36 Top = 1 Width = 240 end object ManagementArea: TArea Left = 704 Height = 40 Top = 312 Width = 56 end object MovieSpeed1Btn: TButtonB Tag = 256 Left = 384 Height = 25 Top = 384 Width = 25 Visible = False Down = False Permanent = True OnClick = MovieSpeedBtnClick ButtonIndex = 24 end object MovieSpeed2Btn: TButtonB Tag = 512 Left = 416 Height = 25 Top = 384 Width = 25 Visible = False Down = False Permanent = True OnClick = MovieSpeedBtnClick ButtonIndex = 25 end object MovieSpeed3Btn: TButtonB Tag = 768 Left = 448 Height = 25 Top = 384 Width = 25 Visible = False Down = False Permanent = True OnClick = MovieSpeedBtnClick ButtonIndex = 26 end object MovieSpeed4Btn: TButtonB Tag = 1024 Left = 480 Height = 25 Top = 384 Width = 25 Visible = False Down = False Permanent = True OnClick = MovieSpeedBtnClick ButtonIndex = 27 end object Timer1: TTimer Enabled = False Interval = 50 OnTimer = Timer1Timer Left = 8 Top = 48 end object GamePopup: TPopupMenu AutoPopup = False Left = 40 Top = 48 object mHelp: TMenuItem Tag = 7 ShortCut = 112 OnClick = mHelpClick end object mTechTree: TMenuItem GroupIndex = 1 ShortCut = 84 OnClick = mTechTreeClick end object N12: TMenuItem Caption = '-' GroupIndex = 1 end object mViewpoint: TMenuItem GroupIndex = 1 end object mDebugMap: TMenuItem Tag = 49 GroupIndex = 1 ShortCut = 16459 end object mOptions: TMenuItem Tag = 29 GroupIndex = 1 object mOwnMovement: TMenuItem Tag = 30 object mSlowMoves: TMenuItem Tag = 75 RadioItem = True OnClick = Radio end object mFastMoves: TMenuItem Tag = 76 RadioItem = True OnClick = Radio end object mVeryFastMoves: TMenuItem Tag = 77 RadioItem = True OnClick = Radio end object N7: TMenuItem Caption = '-' end object mEffectiveMovesOnly: TMenuItem Tag = 95 OnClick = Toggle end end object mAllyMovement: TMenuItem Tag = 90 object mAlSlowMoves: TMenuItem Tag = 91 RadioItem = True OnClick = Radio end object mAlFastMoves: TMenuItem Tag = 92 RadioItem = True OnClick = Radio end object mAlNoMoves: TMenuItem Tag = 93 RadioItem = True OnClick = Radio end object N8: TMenuItem Caption = '-' end object mAlEffectiveMovesOnly: TMenuItem Tag = 94 OnClick = Toggle end end object mEnemyMovement: TMenuItem Tag = 74 object mEnMoves: TMenuItem Tag = 78 RadioItem = True OnClick = Radio end object mEnFastMoves: TMenuItem Tag = 79 RadioItem = True OnClick = Radio end object mEnNoMoves: TMenuItem Tag = 53 RadioItem = True OnClick = Radio end object N9: TMenuItem Caption = '-' end object mEnAttacks: TMenuItem Tag = 52 OnClick = Toggle end end object N11: TMenuItem Caption = '-' GroupIndex = 1 RadioItem = True end object mRepList: TMenuItem Tag = 65 GroupIndex = 1 RadioItem = True OnClick = Radio end object mRepScreens: TMenuItem Tag = 66 GroupIndex = 1 RadioItem = True OnClick = Radio end object mRep: TMenuItem Tag = 34 object mRep0: TMenuItem OnClick = mRepClicked end object mRep1: TMenuItem Tag = 256 OnClick = mRepClicked end object mRep2: TMenuItem Tag = 512 OnClick = mRepClicked end object mRep3: TMenuItem Tag = 768 OnClick = mRepClicked end object mRep4: TMenuItem Tag = 1024 OnClick = mRepClicked end object mRep5: TMenuItem Tag = 1280 OnClick = mRepClicked end object mRep6: TMenuItem Tag = 1536 OnClick = mRepClicked end object mRep7: TMenuItem Tag = 1792 OnClick = mRepClicked end object mRep8: TMenuItem Tag = 2048 OnClick = mRepClicked end object mRep9: TMenuItem Tag = 2304 OnClick = mRepClicked end object mRep10: TMenuItem Tag = 2560 OnClick = mRepClicked end object mRep11: TMenuItem Tag = 2816 OnClick = mRepClicked end object mRep12: TMenuItem Tag = 3072 OnClick = mRepClicked end object mRep13: TMenuItem Tag = 3328 OnClick = mRepClicked end object mRep14: TMenuItem Tag = 3584 OnClick = mRepClicked end object mRep15: TMenuItem Tag = 3840 OnClick = mRepClicked end end object N10: TMenuItem Caption = '-' GroupIndex = 1 RadioItem = True end object mWaitTurn: TMenuItem Tag = 32 OnClick = Toggle end object mScrolling: TMenuItem Tag = 84 object mScrollSlow: TMenuItem Tag = 85 RadioItem = True OnClick = Radio end object mScrollFast: TMenuItem Tag = 86 RadioItem = True OnClick = Radio end object mScrollOff: TMenuItem Tag = 87 RadioItem = True OnClick = Radio end end object mTileSize: TMenuItem Tag = 96 object mSmallTiles: TMenuItem Tag = 97 RadioItem = True OnClick = mSmallTilesClick end object mNormalTiles: TMenuItem Tag = 98 RadioItem = True OnClick = mNormalTilesClick end object mBigTiles: TMenuItem Tag = 99 RadioItem = True OnClick = mBigTilesClick end end object mSound: TMenuItem Tag = 80 object mSoundOn: TMenuItem Tag = 82 RadioItem = True OnClick = mSoundOnClick end object mSoundOnAlt: TMenuItem Tag = 83 RadioItem = True Visible = False OnClick = mSoundOnAltClick end object mSoundOff: TMenuItem Tag = 81 RadioItem = True OnClick = mSoundOffClick end end object N6: TMenuItem Caption = '-' GroupIndex = 1 RadioItem = True end object mTest: TMenuItem Tag = 8 object mJump: TMenuItem Tag = 54 ShortCut = 16458 OnClick = mJumpClick end object mRun: TMenuItem Tag = 63 ShortCut = 16466 OnClick = mRunClick end object mNames: TMenuItem Tag = 67 ShortCut = 16462 OnClick = mNamesClick end object mLocCodes: TMenuItem Tag = 27 ShortCut = 16460 OnClick = mShowClick end object mLog: TMenuItem Tag = 10 ShortCut = 16461 OnClick = mLogClick end end end object mManip: TMenuItem Tag = 56 GroupIndex = 1 object mManip0: TMenuItem Tag = 57 OnClick = mManipClick end object mManip1: TMenuItem Tag = 314 OnClick = mManipClick end object mManip2: TMenuItem Tag = 571 OnClick = mManipClick end object mManip3: TMenuItem Tag = 828 OnClick = mManipClick end object mManip4: TMenuItem Tag = 1085 OnClick = mManipClick end object mManip5: TMenuItem Tag = 1342 OnClick = mManipClick end object mManip6: TMenuItem Tag = 1604 OnClick = mManipClick end end object mMacro: TMenuItem Tag = 42 GroupIndex = 1 object mEnhanceDef: TMenuItem Tag = 40 OnClick = mEnhanceDefClick end object mCityTypes: TMenuItem Tag = 11 OnClick = mCityTypesClick end end object mRandomMap: TMenuItem Tag = 71 GroupIndex = 1 ShortCut = 16466 OnClick = mRandomMapClick end object N3: TMenuItem Caption = '-' GroupIndex = 1 end object mWebsite: TMenuItem Tag = 88 GroupIndex = 1 OnClick = mWebsiteClick end object N2: TMenuItem Caption = '-' GroupIndex = 1 end object mResign: TMenuItem Tag = 2 GroupIndex = 1 ShortCut = 16465 OnClick = mResignClick end end object UnitPopup: TPopupMenu AutoPopup = False Left = 104 Top = 48 object mdisband: TMenuItem Tag = 72 ShortCut = 16452 OnClick = mDisbandOrUtilizeClick end object mUtilize: TMenuItem ShortCut = 90 OnClick = mDisbandOrUtilizeClick end object N1: TMenuItem Caption = '-' end object mcity: TMenuItem ShortCut = 66 OnClick = mcityClick end object mPillage: TMenuItem Tag = 19 ShortCut = 16464 OnClick = mPillageClick end object N5: TMenuItem Caption = '-' end object mhome: TMenuItem ShortCut = 72 OnClick = mhomeClick end object mLoad: TMenuItem Tag = 24 ShortCut = 76 OnClick = mLoadClick end object mUnload: TMenuItem Tag = 70 ShortCut = 85 OnClick = mUnloadClick end object mSelectTransport: TMenuItem Tag = 73 ShortCut = 16468 OnClick = mSelectTransportClick end object mGoOn: TMenuItem Tag = 13 ShortCut = 71 OnClick = mGoOnClick end object mCancel: TMenuItem Tag = 1 ShortCut = 16451 OnClick = mCancelClick end object mRecover: TMenuItem Tag = 69 ShortCut = 86 OnClick = mRecoverClick end object mwait: TMenuItem Tag = 25 ShortCut = 87 OnClick = mwaitClick end object mnoorders: TMenuItem Tag = 26 ShortCut = 32 OnClick = mnoordersClick end object mstay: TMenuItem Tag = 22 ShortCut = 83 OnClick = mstayClick end object mCentre: TMenuItem Tag = 12 ShortCut = 67 OnClick = mCentreClick end object N13: TMenuItem Caption = '-' end object mPrevUnit: TMenuItem Tag = 100 ShortCut = 46 OnClick = mPrevUnitClick end object mNextUnit: TMenuItem Tag = 101 ShortCut = 45 OnClick = mNextUnitClick end end object StatPopup: TPopupMenu AutoPopup = False Left = 72 Top = 48 object mUnitStat: TMenuItem Tag = 9 ShortCut = 113 OnClick = mUnitStatClick end object mCityStat: TMenuItem Tag = 37 ShortCut = 114 OnClick = mCityStatClick end object mScienceStat: TMenuItem Tag = 38 ShortCut = 115 OnClick = mScienceStatClick end object mEUnitStat: TMenuItem Tag = 50 ShortCut = 116 OnClick = mEUnitStatClick end object mDiagram: TMenuItem Tag = 21 ShortCut = 117 OnClick = mDiagramClick end object mWonders: TMenuItem Tag = 6 ShortCut = 118 OnClick = mWondersClick end object mShips: TMenuItem Tag = 41 ShortCut = 119 OnClick = mShipsClick end object N4: TMenuItem Caption = '-' end object mNations: TMenuItem Tag = 55 ShortCut = 120 OnClick = mNationsClick end object mEmpire: TMenuItem Tag = 3 ShortCut = 121 OnClick = mEmpireClick end object mRevolution: TMenuItem Tag = 89 OnClick = mRevolutionClick end end object EditPopup: TPopupMenu Left = 168 Top = 48 object mCreateUnit: TMenuItem Tag = 47 end end object TerrainPopup: TPopupMenu Left = 136 Top = 48 object mtrans: TMenuItem Tag = 273 ShortCut = 79 OnClick = mtransClick end object mAfforest: TMenuItem Tag = 301 ShortCut = 77 OnClick = mAfforestClick end object mClear: TMenuItem Tag = 298 ShortCut = 73 OnClick = mClearClick end object mfort: TMenuItem Tag = 276 ShortCut = 70 OnClick = mfortClick end object mAirBase: TMenuItem Tag = 272 ShortCut = 65 OnClick = mAirBaseClick end object mCanal: TMenuItem Tag = 279 ShortCut = 78 OnClick = mCanalClick end object mmine: TMenuItem Tag = 302 ShortCut = 77 OnClick = mmineClick end object mFarm: TMenuItem Tag = 300 ShortCut = 73 OnClick = mFarmClick end object mirrigation: TMenuItem Tag = 299 ShortCut = 73 OnClick = mirrigationClick end object mRailRoad: TMenuItem Tag = 297 ShortCut = 82 OnClick = mRailRoadClick end object mroad: TMenuItem Tag = 296 ShortCut = 82 OnClick = mroadClick end object mpollution: TMenuItem Tag = 274 ShortCut = 80 OnClick = mpollutionClick end object mEnhance: TMenuItem Tag = 295 ShortCut = 69 OnClick = mEnhanceClick end end end