⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 gmain.dfm

📁 传奇源代码的delphi版本
💻 DFM
📖 第 1 页 / 共 5 页
字号:
          end
        end
        object TabSheet10: TTabSheet
          Caption = 'M2 Server'
          ImageIndex = 6
          object GroupBox15: TGroupBox
            Left = 10
            Top = 10
            Width = 611
            Height = 221
            Caption = '?????????'
            TabOrder = 0
            object GroupBox16: TGroupBox
              Left = 10
              Top = 20
              Width = 161
              Height = 91
              Caption = '????'
              TabOrder = 0
              object Label19: TLabel
                Left = 10
                Top = 25
                Width = 24
                Height = 15
                Caption = '??X:'
              end
              object Label20: TLabel
                Left = 10
                Top = 55
                Width = 24
                Height = 15
                Caption = '??Y:'
              end
              object EditM2Server_MainFormX: TSpinEdit
                Left = 60
                Top = 20
                Width = 81
                Height = 24
                Hint = '?????????????,??X?'
                MaxValue = 10000
                MinValue = 0
                TabOrder = 0
                Value = 0
                OnChange = EditM2Server_MainFormXChange
              end
              object EditM2Server_MainFormY: TSpinEdit
                Left = 60
                Top = 50
                Width = 81
                Height = 24
                Hint = '?????????????,??Y?'
                MaxValue = 10000
                MinValue = 0
                TabOrder = 1
                Value = 0
                OnChange = EditM2Server_MainFormYChange
              end
            end
            object ButtonM2ServerDefault: TButton
              Left = 500
              Top = 180
              Width = 101
              Height = 31
              Caption = 'Default(&D)'
              TabOrder = 1
              OnClick = ButtonM2ServerDefaultClick
            end
            object GroupBox32: TGroupBox
              Left = 180
              Top = 120
              Width = 181
              Height = 91
              Caption = 'Test Info'
              TabOrder = 2
              object Label61: TLabel
                Left = 10
                Top = 25
                Width = 59
                Height = 15
                Caption = 'Test Level:'
              end
              object Label62: TLabel
                Left = 10
                Top = 55
                Width = 56
                Height = 15
                Caption = 'Test Gold:'
              end
              object EditM2Server_TestLevel: TSpinEdit
                Left = 85
                Top = 20
                Width = 86
                Height = 24
                Hint = '???????'
                MaxValue = 20000
                MinValue = 0
                TabOrder = 0
                Value = 10
                OnChange = EditM2Server_TestLevelChange
              end
              object EditM2Server_TestGold: TSpinEdit
                Left = 85
                Top = 50
                Width = 86
                Height = 24
                Hint = '????????????'
                Increment = 1000
                MaxValue = 20000000
                MinValue = 0
                TabOrder = 1
                Value = 10
                OnChange = EditM2Server_TestGoldChange
              end
            end
            object GroupBox39: TGroupBox
              Left = 180
              Top = 28
              Width = 261
              Height = 91
              Caption = '??'
              TabOrder = 3
              object Label55: TLabel
                Left = 10
                Top = 25
                Width = 56
                Height = 15
                Caption = 'Gate POrt:'
              end
              object Label56: TLabel
                Left = 10
                Top = 55
                Width = 51
                Height = 15
                Caption = 'Msg Port:'
              end
              object EditM2ServerGatePort: TEdit
                Left = 80
                Top = 20
                Width = 51
                Height = 23
                TabOrder = 0
                Text = '5000'
              end
              object EditM2ServerMsgSrvPort: TEdit
                Left = 80
                Top = 50
                Width = 51
                Height = 23
                TabOrder = 1
                Text = '4900'
              end
            end
            object GroupBox40: TGroupBox
              Left = 10
              Top = 120
              Width = 161
              Height = 51
              Caption = 'M2Server'
              TabOrder = 4
              object CheckBoxM2ServerGetStart: TCheckBox
                Left = 10
                Top = 20
                Width = 141
                Height = 21
                Caption = 'Start'
                TabOrder = 0
                OnClick = CheckBoxM2ServerGetStartClick
              end
            end
          end
          object ButtonPrv8: TButton
            Left = 400
            Top = 329
            Width = 101
            Height = 41
            Caption = 'Previous(&P)'
            TabOrder = 1
            OnClick = ButtonPrv8Click
          end
          object ButtonNext8: TButton
            Left = 510
            Top = 329
            Width = 101
            Height = 41
            Caption = 'Next(&N)'
            TabOrder = 2
            OnClick = ButtonNext8Click
          end
        end
        object TabSheet11: TTabSheet
          Caption = 'General Game Config'
          ImageIndex = 7
          object ButtonSave: TButton
            Left = 510
            Top = 329
            Width = 101
            Height = 41
            Caption = 'Save(&S)'
            TabOrder = 0
            OnClick = ButtonSaveClick
          end
          object ButtonGenGameConfig: TButton
            Left = 290
            Top = 329
            Width = 101
            Height = 41
            Caption = 'GameConfig(&G)'
            TabOrder = 1
            OnClick = ButtonGenGameConfigClick
          end
          object ButtonPrv9: TButton
            Left = 400
            Top = 329
            Width = 101
            Height = 41
            Caption = 'Previous(&P)'
            TabOrder = 2
            OnClick = ButtonPrv9Click
          end
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = '????'
      ImageIndex = 2
      object GroupBox6: TGroupBox
        Left = 10
        Top = 10
        Width = 311
        Height = 181
        Caption = '???'
        TabOrder = 0
        object Label8: TLabel
          Left = 10
          Top = 35
          Width = 31
          Height = 15
          Caption = '????:'
        end
        object EditSkin: TSpinEdit
          Left = 80
          Top = 30
          Width = 101
          Height = 24
          MaxValue = 0
          MinValue = -1
          TabOrder = 0
          Value = 0
          OnChange = EditSkinChange
        end
        object ButtonFormSave: TButton
          Left = 220
          Top = 140
          Width = 81
          Height = 31
          Caption = 'Save'
          TabOrder = 1
          OnClick = ButtonFormSaveClick
        end
      end
    end
    object TabSheet13: TTabSheet
      Caption = '????'
      ImageIndex = 3
    end
    object TabSheetDebug: TTabSheet
      Caption = 'Debug'
      ImageIndex = 6
      object GroupBox29: TGroupBox
        Left = 10
        Top = 0
        Width = 621
        Height = 411
        Caption = 'Codes'
        TabOrder = 0
        object GroupBox30: TGroupBox
          Left = 10
          Top = 20
          Width = 331
          Height = 141
          Caption = 'M2 Codes'
          TabOrder = 0
          object Label45: TLabel
            Left = 10
            Top = 25
            Width = 55
            Height = 15
            Caption = 'CodeAddr'
          end
          object Label46: TLabel
            Left = 10
            Top = 55
            Width = 30
            Height = 15
            Caption = 'Code'
          end
          object Label58: TLabel
            Left = 10
            Top = 85
            Width = 35
            Height = 15
            Caption = 'String:'
          end
          object EditM2CheckCodeAddr: TEdit
            Left = 70
            Top = 20
            Width = 121
            Height = 23
            TabOrder = 0
          end
          object EditM2CheckCode: TEdit
            Left = 70
            Top = 50
            Width = 121
            Height = 23
            TabOrder = 1
          end
          object ButtonM2Suspend: TButton
            Left = 240
            Top = 40
            Width = 81
            Height = 31
            Caption = 'M2Suspend'
            TabOrder = 2
            Visible = False
            OnClick = ButtonM2SuspendClick
          end
          object EditM2CheckStr: TEdit
            Left = 70
            Top = 80
            Width = 251
            Height = 23
            TabOrder = 3
          end
        end
        object GroupBox31: TGroupBox
          Left = 10
          Top = 170
          Width = 331
          Height = 131
          Caption = 'DB Codes'
          TabOrder = 1
          object Label47: TLabel
            Left = 10
            Top = 25
            Width = 55
            Height = 15
            Caption = 'CodeAddr'
          end
          object Label48: TLabel
            Left = 10
            Top = 55
            Width = 30
            Height = 15
            Caption = 'Code'
          end
          object Label57: TLabel
            Left = 10
            Top = 85
            Width = 32
            Height = 15
            Caption = 'String'
          end
          object EditDBCheckCodeAddr: TEdit
            Left = 70
            Top = 20
            Width = 121
            Height = 23
            TabOrder = 0
          end
          object EditDBCheckCode: TEdit
            Left = 70
            Top = 50
            Width = 121
            Height = 23
            TabOrder = 1
          end
          object Button3: TButton
            Left = 240
            Top = 40
            Width = 81
            Height = 31
            Caption = 'DB Suspend'
            TabOrder = 2
            Visible = False
            OnClick = ButtonM2SuspendClick
          end
          object EditDBCheckStr: TEdit
            Left = 70
            Top = 80
            Width = 251
            Height = 23
            TabOrder = 3
          end
        end
      end
    end
  end
  object TimerStartGame: TTimer
    Enabled = False
    Interval = 200
    OnTimer = TimerStartGameTimer
    Left = 376
  end
  object TimerStopGame: TTimer
    Enabled = False
    Interval = 500
    OnTimer = TimerStopGameTimer
    Left = 408
  end
  object TimerCheckRun: TTimer
    Enabled = False
    Interval = 2000
    OnTimer = TimerCheckRunTimer
    Left = 440
  end
  object ServerSocket: TServerSocket
    Active = False
    Address = '0.0.0.0'
    Port = 6350
    ServerType = stNonBlocking
    OnClientConnect = ServerSocketClientConnect
    OnClientDisconnect = ServerSocketClientDisconnect
    OnClientRead = ServerSocketClientRead
    OnClientError = ServerSocketClientError
    Left = 504
    Top = 64
  end
  object Timer: TTimer
    Enabled = False
    Interval = 10
    OnTimer = TimerTimer
    Left = 504
    Top = 32
  end
  object TimerCheckDebug: TTimer
    Enabled = False
    Interval = 500
    OnTimer = TimerCheckDebugTimer
    Left = 504
    Top = 96
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -