functionconfig.dfm

来自「2009最新 传奇汉化0599代码 传奇汉化」· DFM 代码 · 共 2,370 行 · 第 1/5 页

object frmFunctionConfig: TfrmFunctionConfig
  Left = 245
  Top = 219
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Function Configurations'
  ClientHeight = 388
  ClientWidth = 510
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  ShowHint = True
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object FunctionConfigControl: TPageControl
    Left = 9
    Top = 9
    Width = 495
    Height = 373
    ActivePage = TabSheetGeneral
    MultiLine = True
    TabOrder = 0
    OnChanging = FunctionConfigControlChanging
    object TabSheetGeneral: TTabSheet
      Caption = 'General'
      ImageIndex = 3
      object GroupBox7: TGroupBox
        Left = 237
        Top = 23
        Width = 157
        Height = 137
        Caption = 'Hunger system'
        TabOrder = 0
        object CheckBoxHungerSystem: TCheckBox
          Left = 9
          Top = 17
          Width = 131
          Height = 19
          Hint = 'Activate hunger system'
          Caption = 'Use Hunger System'
          TabOrder = 0
          OnClick = CheckBoxHungerSystemClick
        end
        object GroupBoxHunger: TGroupBox
          Left = 9
          Top = 50
          Width = 139
          Height = 62
          Caption = 'Settings'
          TabOrder = 1
          object CheckBoxHungerDecHP: TCheckBox
            Left = 9
            Top = 17
            Width = 96
            Height = 19
            Hint = 'Decrease users HP when hunger reaches 0'
            Caption = 'Decrease HP'
            TabOrder = 1
            OnClick = CheckBoxHungerDecHPClick
          end
          object CheckBoxHungerDecPower: TCheckBox
            Left = 9
            Top = 35
            Width = 105
            Height = 18
            Hint = 'Decrease DC when hunger increases'
            Caption = 'Decrease DC'
            TabOrder = 0
            OnClick = CheckBoxHungerDecPowerClick
          end
        end
      end
      object ButtonGeneralSave: TButton
        Left = 399
        Top = 283
        Width = 70
        Height = 27
        Hint = 'Save settings'
        Caption = '&Save'
        TabOrder = 1
        OnClick = ButtonGeneralSaveClick
      end
      object GroupBox34: TGroupBox
        Left = 64
        Top = 23
        Width = 145
        Height = 221
        Caption = 'Name colors'
        TabOrder = 2
        object Label85: TLabel
          Left = 12
          Top = 17
          Width = 55
          Height = 26
          Caption = 'Hit another player:'
          WordWrap = True
        end
        object LabelPKFlagNameColor: TLabel
          Left = 121
          Top = 23
          Width = 10
          Height = 18
          AutoSize = False
          Color = clBackground
          ParentColor = False
        end
        object Label87: TLabel
          Left = 12
          Top = 64
          Width = 52
          Height = 13
          Caption = 'PK Level1:'
        end
        object LabelPKLevel1NameColor: TLabel
          Left = 121
          Top = 62
          Width = 10
          Height = 19
          AutoSize = False
          Color = clBackground
          ParentColor = False
        end
        object Label89: TLabel
          Left = 12
          Top = 90
          Width = 52
          Height = 13
          Caption = 'PK Level2:'
        end
        object LabelPKLevel2NameColor: TLabel
          Left = 121
          Top = 88
          Width = 10
          Height = 19
          AutoSize = False
          Color = clBackground
          ParentColor = False
        end
        object Label91: TLabel
          Left = 12
          Top = 137
          Width = 46
          Height = 13
          Caption = 'Guild Ally:'
        end
        object LabelAllyAndGuildNameColor: TLabel
          Left = 121
          Top = 135
          Width = 10
          Height = 18
          AutoSize = False
          Color = clBackground
          ParentColor = False
        end
        object Label93: TLabel
          Left = 12
          Top = 163
          Width = 27
          Height = 13
          Caption = 'Guild:'
        end
        object LabelWarGuildNameColor: TLabel
          Left = 121
          Top = 161
          Width = 10
          Height = 18
          AutoSize = False
          Color = clBackground
          ParentColor = False
        end
        object Label95: TLabel
          Left = 12
          Top = 189
          Width = 34
          Height = 13
          Caption = 'FreePk'
        end
        object LabelInFreePKAreaNameColor: TLabel
          Left = 121
          Top = 187
          Width = 10
          Height = 18
          AutoSize = False
          Color = clBackground
          ParentColor = False
        end
        object EditPKFlagNameColor: TSpinEdit
          Left = 69
          Top = 20
          Width = 45
          Height = 22
          Hint = 'Namecolour when you hit another player'
          EditorEnabled = False
          MaxValue = 255
          MinValue = 0
          TabOrder = 0
          Value = 47
          OnChange = EditPKFlagNameColorChange
        end
        object EditPKLevel1NameColor: TSpinEdit
          Left = 69
          Top = 60
          Width = 45
          Height = 22
          Hint = 'Namecolour when PK level from 100 to 199'
          EditorEnabled = False
          MaxValue = 255
          MinValue = 0
          TabOrder = 1
          Value = 251
          OnChange = EditPKLevel1NameColorChange
        end
        object EditPKLevel2NameColor: TSpinEdit
          Left = 69
          Top = 86
          Width = 45
          Height = 22
          Hint = 'Namecolour when PK level 200+'
          EditorEnabled = False
          MaxValue = 255
          MinValue = 0
          TabOrder = 2
          Value = 249
          OnChange = EditPKLevel2NameColorChange
        end
        object EditAllyAndGuildNameColor: TSpinEdit
          Left = 69
          Top = 133
          Width = 45
          Height = 22
          Hint = 'Namecolour of an allied guild, Default=180'
          EditorEnabled = False
          MaxValue = 255
          MinValue = 0
          TabOrder = 3
          Value = 180
          OnChange = EditAllyAndGuildNameColorChange
        end
        object EditWarGuildNameColor: TSpinEdit
          Left = 69
          Top = 159
          Width = 45
          Height = 22
          Hint = 'Namecolour of a guild you are warring with, Default=69'
          EditorEnabled = False
          MaxValue = 255
          MinValue = 0
          TabOrder = 4
          Value = 69
          OnChange = EditWarGuildNameColorChange
        end
        object EditInFreePKAreaNameColor: TSpinEdit
          Left = 69
          Top = 185
          Width = 45
          Height = 22
          Hint = 'Namecolour when in an area where PK'#39'ing is allowed, Default=221'
          EditorEnabled = False
          MaxValue = 255
          MinValue = 0
          TabOrder = 5
          Value = 221
          OnChange = EditInFreePKAreaNameColorChange
        end
      end
    end
    object PasswordSheet: TTabSheet
      Caption = 'Locks'
      ImageIndex = 2
      object GroupBox1: TGroupBox
        Left = 9
        Top = 0
        Width = 469
        Height = 209
        TabOrder = 0
        object CheckBoxEnablePasswordLock: TCheckBox
          Left = 9
          Top = -5
          Width = 151
          Height = 27
          Hint = 'Turn on password system'
          Caption = 'Enable storage passwords'
          Checked = True
          State = cbChecked
          TabOrder = 0
          OnClick = CheckBoxEnablePasswordLockClick
        end
        object GroupBox2: TGroupBox
          Left = 9
          Top = 17
          Width = 287
          Height = 183
          TabOrder = 1
          object CheckBoxLockGetBackItem: TCheckBox
            Left = 9
            Top = 17
            Width = 110
            Height = 19
            Hint = 'Storage must be unlocked before items can be retrieved'
            Caption = 'Lock get back item'
            Checked = True
            State = cbChecked
            TabOrder = 0
            OnClick = CheckBoxLockGetBackItemClick
          end
          object GroupBox4: TGroupBox
            Left = 9
            Top = 43
            Width = 269
            Height = 114
            Caption = 'Triggers'
            TabOrder = 1
            object CheckBoxLockWalk: TCheckBox
              Left = 9
              Top = 35
              Width = 113
              Height = 18
              Caption = 'Lock Walking'
              TabOrder = 0
              OnClick = CheckBoxLockWalkClick
            end
            object CheckBoxLockRun: TCheckBox
              Left = 9
              Top = 52
              Width = 113
              Height = 18
              Caption = 'Lock Running'
              TabOrder = 1
              OnClick = CheckBoxLockRunClick
            end
            object CheckBoxLockHit: TCheckBox
              Left = 9
              Top = 69
              Width = 113
              Height = 19
              Caption = 'Lock hitting'
              TabOrder = 2
              OnClick = CheckBoxLockHitClick
            end
            object CheckBoxLockSpell: TCheckBox
              Left = 9
              Top = 87
              Width = 113
              Height = 18
              Caption = 'Lock Magics'
              TabOrder = 3
              OnClick = CheckBoxLockSpellClick
            end
            object CheckBoxLockSendMsg: TCheckBox
              Left = 130
              Top = 35
              Width = 114
              Height = 18
              Caption = 'Lock SendMsg'
              TabOrder = 4
              OnClick = CheckBoxLockSendMsgClick
            end
            object CheckBoxLockInObMode: TCheckBox
              Left = 130
              Top = 17
              Width = 131
              Height = 19
              Hint = 'Lock Observer mode so a password is required to become visable'
              Caption = 'Lock(in observer)'
              TabOrder = 5
              OnClick = CheckBoxLockInObModeClick
            end
            object CheckBoxLockLogin: TCheckBox
              Left = 9
              Top = 17
              Width = 113
              Height = 19
              Caption = 'Lock Login'
              TabOrder = 6
              OnClick = CheckBoxLockLoginClick
            end
            object CheckBoxLockUseItem: TCheckBox
              Left = 130
              Top = 87
              Width = 114
              Height = 18
              Caption = 'Lock use items'
              TabOrder = 7
              OnClick = CheckBoxLockUseItemClick
            end
            object CheckBoxLockDropItem: TCheckBox
              Left = 130
              Top = 69
              Width = 114
              Height = 19
              Caption = 'Lock drop items'
              TabOrder = 8
              OnClick = CheckBoxLockDropItemClick
            end
            object CheckBoxLockDealItem: TCheckBox
              Left = 130
              Top = 52
              Width = 131
              Height = 18
              Caption = 'Lock trading'
              TabOrder = 9
              OnClick = CheckBoxLockDealItemClick
            end
          end
        end
        object GroupBox3: TGroupBox
          Left = 303
          Top = 17
          Width = 157
          Height = 71
          Caption = 'Password error count'
          TabOrder = 2
          object Label1: TLabel
            Left = 9
            Top = 20
            Width = 31
            Height = 13
            Caption = 'Count:'
          end
          object EditErrorPasswordCount: TSpinEdit
            Left = 74
            Top = 16
            Width = 57
            Height = 24
            Hint = 'Max no of password attempts'
            EditorEnabled = False
            MaxValue = 10
            MinValue = 1
            TabOrder = 0
            Value = 3
            OnChange = EditErrorPasswordCountChange
          end
          object CheckBoxErrorCountKick: TCheckBox
            Left = 9
            Top = 43
            Width = 110
            Height = 19
            Hint = 'Kick user if incorrect X times in a row'
            Caption = 'Kick on max count?'
            Checked = True
            State = cbChecked
            TabOrder = 1
            OnClick = CheckBoxErrorCountKickClick
          end
        end
        object ButtonPasswordLockSave: TButton
          Left = 390
          Top = 170
          Width = 70
          Height = 28
          Hint = 'Save settings'
          Caption = '&Save'
          TabOrder = 3
          OnClick = ButtonPasswordLockSaveClick
        end
      end
    end
    object TabSheet33: TTabSheet
      Caption = 'Master'
      ImageIndex = 5
      object GroupBox21: TGroupBox
        Left = 127
        Top = 64
        Width = 174
        Height = 166
        TabOrder = 0
        object GroupBox22: TGroupBox
          Left = 9