itemset.dfm

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

object frmItemSet: TfrmItemSet
  Left = 230
  Top = 218
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Item Functions'
  ClientHeight = 411
  ClientWidth = 539
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '??'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  ShowHint = True
  PixelsPerInch = 96
  TextHeight = 15
  object PageControl: TPageControl
    Left = 10
    Top = 10
    Width = 521
    Height = 391
    ActivePage = TabSheet8
    TabOrder = 0
    object TabSheet8: TTabSheet
      Caption = 'Normal Items'
      object ItemSetPageControl: TPageControl
        Left = 10
        Top = 5
        Width = 491
        Height = 281
        ActivePage = TabSheet1
        MultiLine = True
        TabOrder = 0
        TabPosition = tpBottom
        object TabSheet1: TTabSheet
          Caption = 'Exp rate'
          object GroupBox141: TGroupBox
            Left = 10
            Top = 10
            Width = 461
            Height = 201
            Caption = 'Experience Rate'
            TabOrder = 0
            object Label108: TLabel
              Left = 14
              Top = 30
              Width = 29
              Height = 15
              Caption = 'Rate:'
            end
            object Label109: TLabel
              Left = 26
              Top = 114
              Width = 367
              Height = 39
              AutoSize = False
              Caption = 
                'Item EXP rate - possibly an item that increases Exp rate (simila' +
                'r to skill necklace but for exp?'
              Font.Charset = ANSI_CHARSET
              Font.Color = clWindowText
              Font.Height = -15
              Font.Name = '??'
              Font.Style = []
              ParentFont = False
              WordWrap = True
            end
            object EditItemExpRate: TSpinEdit
              Left = 70
              Top = 25
              Width = 71
              Height = 24
              EditorEnabled = False
              MaxValue = 60000
              MinValue = 1
              TabOrder = 0
              Value = 10000
              OnChange = EditItemExpRateChange
            end
          end
        end
        object TabSheet2: TTabSheet
          Caption = 'Power rate'
          ImageIndex = 1
          object GroupBox142: TGroupBox
            Left = 10
            Top = 10
            Width = 461
            Height = 199
            Caption = 'Power rate'
            TabOrder = 0
            object Label110: TLabel
              Left = 14
              Top = 30
              Width = 29
              Height = 15
              Caption = 'Rate:'
            end
            object EditItemPowerRate: TSpinEdit
              Left = 70
              Top = 25
              Width = 71
              Height = 24
              Hint = 'Item power rate'
              EditorEnabled = False
              MaxValue = 60000
              MinValue = 1
              TabOrder = 0
              Value = 100
              OnChange = EditItemPowerRateChange
            end
          end
        end
        object TabSheet4: TTabSheet
          Caption = 'Guild Recall'
          ImageIndex = 3
          object GroupBox28: TGroupBox
            Left = 10
            Top = 10
            Width = 461
            Height = 201
            Caption = 'Recall Set'
            TabOrder = 0
            object Label85: TLabel
              Left = 14
              Top = 30
              Width = 99
              Height = 15
              Caption = 'Re-generate time:'
            end
            object Label1: TLabel
              Left = 206
              Top = 30
              Width = 48
              Height = 15
              Caption = 'seconds'
            end
            object EditGuildRecallTime: TSpinEdit
              Left = 130
              Top = 25
              Width = 71
              Height = 24
              Hint = 
                'Time that player must wait before they can use guild recall agai' +
                'n'
              EditorEnabled = False
              MaxValue = 60000
              MinValue = 1
              TabOrder = 0
              Value = 180
              OnChange = EditGuildRecallTimeChange
            end
          end
        end
        object TabSheet5: TTabSheet
          Caption = 'Paralysis'
          ImageIndex = 4
          object GroupBox44: TGroupBox
            Left = 10
            Top = 10
            Width = 461
            Height = 201
            Caption = 'Paralysis Ring'
            TabOrder = 0
            object Label116: TLabel
              Left = 14
              Top = 60
              Width = 34
              Height = 15
              Caption = 'Lasts:'
            end
            object Label120: TLabel
              Left = 14
              Top = 30
              Width = 29
              Height = 15
              Caption = 'Rate:'
            end
            object Label124: TLabel
              Left = 140
              Top = 60
              Width = 49
              Height = 15
              Caption = 'Seconds'
            end
            object EditAttackPosionRate: TSpinEdit
              Left = 74
              Top = 25
              Width = 61
              Height = 24
              EditorEnabled = False
              MaxValue = 100
              MinValue = 1
              TabOrder = 0
              Value = 5
              OnChange = EditAttackPosionRateChange
            end
            object EditAttackPosionTime: TSpinEdit
              Left = 74
              Top = 55
              Width = 61
              Height = 24
              Hint = 'Length of time the attacked player/mob will remain paralysed'
              EditorEnabled = False
              MaxValue = 100
              MinValue = 1
              TabOrder = 1
              Value = 5
              OnChange = EditAttackPosionTimeChange
            end
          end
        end
        object TabSheet6: TTabSheet
          Caption = 'Teleport'
          ImageIndex = 5
          object GroupBox43: TGroupBox
            Left = 10
            Top = 10
            Width = 461
            Height = 201
            Caption = 'Teleport Ring'
            TabOrder = 0
            object Label121: TLabel
              Left = 145
              Top = 86
              Width = 48
              Height = 15
              Caption = 'seconds'
            end
            object Label119: TLabel
              Left = 22
              Top = 86
              Width = 31
              Height = 15
              Caption = 'Time:'
            end
            object CheckBoxUserMoveCanOnItem: TCheckBox
              Left = 18
              Top = 56
              Width = 295
              Height = 21
              Caption = 'User can re-spawn on top of items/players/mobs'
              Checked = True
              State = cbChecked
              TabOrder = 0
              OnClick = CheckBoxUserMoveCanOnItemClick
            end
            object CheckBoxUserMoveCanDupObj: TCheckBox
              Left = 18
              Top = 36
              Width = 171
              Height = 21
              Caption = 'Moving can duplicate items'
              TabOrder = 1
              OnClick = CheckBoxUserMoveCanDupObjClick
            end
            object EditUserMoveTime: TSpinEdit
              Left = 74
              Top = 81
              Width = 61
              Height = 24
              EditorEnabled = False
              MaxValue = 100
              MinValue = 1
              TabOrder = 2
              Value = 10
              OnChange = EditUserMoveTimeChange
            end
          end
        end
      end
      object ButtonItemSetSave: TButton
        Left = 418
        Top = 296
        Width = 81
        Height = 32
        Hint = 'Save settings'
        Caption = '&Save'
        TabOrder = 1
        OnClick = ButtonItemSetSaveClick
      end
    end
    object TabSheet19: TTabSheet
      Caption = 'Mystery Items'
      ImageIndex = 2
      object PageControl1: TPageControl
        Left = 10
        Top = 5
        Width = 491
        Height = 316
        ActivePage = TabSheet27
        MultiLine = True
        TabOrder = 0
        TabPosition = tpBottom
        object TabSheet27: TTabSheet
          Caption = 'Ring'
          ImageIndex = 7
          object GroupBox49: TGroupBox
            Left = 10
            Top = 10
            Width = 141
            Height = 81
            Caption = 'DC'
            TabOrder = 0
            object Label152: TLabel
              Left = 14
              Top = 20
              Width = 56
              Height = 15
              Caption = 'Maximum:'
            end
            object Label153: TLabel
              Left = 14
              Top = 50
              Width = 29
              Height = 15
              BiDiMode = bdRightToLeft
              Caption = 'Rate:'
              ParentBiDiMode = False
            end
            object EditUnknowRingDCAddRate: TSpinEdit
              Left = 80
              Top = 45
              Width = 51
              Height = 24
              EditorEnabled = False
              MaxValue = 100
              MinValue = 1
              TabOrder = 0
              Value = 20
              OnChange = EditUnknowRingDCAddRateChange
            end
            object EditUnknowRingDCAddValueMaxLimit: TSpinEdit
              Left = 80
              Top = 15
              Width = 51
              Height = 24
              EditorEnabled = False
              MaxValue = 100
              MinValue = 1
              TabOrder = 1
              Value = 6
              OnChange = EditUnknowRingDCAddValueMaxLimitChange
            end
          end
          object GroupBox50: TGroupBox
            Left = 10
            Top = 100
            Width = 141
            Height = 81
            Caption = 'MC'
            TabOrder = 1
            object Label155: TLabel
              Left = 14
              Top = 20
              Width = 56
              Height = 15
              Caption = 'Maximum:'
            end
            object Label156: TLabel
              Left = 14
              Top = 50
              Width = 29
              Height = 15
              Caption = 'Rate:'
            end
            object EditUnknowRingMCAddRate: TSpinEdit
              Left = 80
              Top = 45
              Width = 51
              Height = 24
              EditorEnabled = False
              MaxValue = 100
              MinValue = 1
              TabOrder = 0
              Value = 20
              OnChange = EditUnknowRingMCAddRateChange
            end
            object EditUnknowRingMCAddValueMaxLimit: TSpinEdit
              Left = 80
              Top = 15
              Width = 51
              Height = 24
              EditorEnabled = False
              MaxValue = 100
              MinValue = 1
              TabOrder = 1
              Value = 6
              OnChange = EditUnknowRingMCAddValueMaxLimitChange
            end
          end
          object GroupBox51: TGroupBox
            Left = 10
            Top = 190
            Width = 141
            Height = 81
            Caption = 'SC'
            TabOrder = 2
            object Label158: TLabel
              Left = 14
              Top = 20
              Width = 56
              Height = 15
              Caption = 'Maximum:'
            end
            object Label159: TLabel
              Left = 14
              Top = 50
              Width = 29
              Height = 15
              Caption = 'Rate:'
            end
            object EditUnknowRingSCAddRate: TSpinEdit
              Left = 80
              Top = 45
              Width = 51
              Height = 24
              EditorEnabled = False
              MaxValue = 100
              MinValue = 1
              TabOrder = 0
              Value = 20
              OnChange = EditUnknowRingSCAddRateChange
            end
            object EditUnknowRingSCAddValueMaxLimit: TSpinEdit
              Left = 80
              Top = 15
              Width = 51
              Height = 24
              EditorEnabled = False
              MaxValue = 100
              MinValue = 1
              TabOrder = 1
              Value = 6
              OnChange = EditUnknowRingSCAddValueMaxLimitChange
            end
          end
          object GroupBox30: TGroupBox
            Left = 160
            Top = 10