fstate.dfm

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

    Width = 21
    Height = 21
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DccCloseClick
    Caption = 'X'
    DParent = DCreateChr
    Visible = True
    EnableFocus = False
    ClickCount = csNorm
    OnClickSound = DLoginNewClickSound
  end
  object DItemGrid: TDGrid
    Left = 212
    Top = 133
    Width = 117
    Height = 45
    OnDblClick = DItemGridDblClick
    Caption = 'DItemGrid'
    DParent = DItemBag
    Visible = True
    EnableFocus = False
    ColCount = 8
    RowCount = 5
    ColWidth = 36
    RowHeight = 32
    ViewTopLine = 0
    OnGridSelect = DItemGridGridSelect
    OnGridMouseMove = DItemGridGridMouseMove
    OnGridPaint = DItemGridGridPaint
  end
  object DLoginChgPw: TDButton
    Left = 64
    Top = 88
    Width = 73
    Height = 21
    OnDirectPaint = DLoginNewDirectPaint
    OnClick = DLoginChgPwClick
    Caption = 'DLoginChgPw'
    DParent = DLogIn
    Visible = True
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DMsgDlg: TDWindow
    Left = 12
    Top = 264
    Width = 189
    Height = 73
    OnDirectPaint = DMsgDlgDirectPaint
    OnKeyDown = DMsgDlgKeyDown
    Caption = 'DMsgDlg'
    DParent = DBackground
    Visible = False
    EnableFocus = True
    ClickCount = csNone
    Floating = True
  end
  object DMsgDlgOk: TDButton
    Left = 28
    Top = 272
    Width = 69
    Height = 24
    OnDirectPaint = DMsgDlgOkDirectPaint
    OnClick = DMsgDlgOkClick
    Caption = 'DMsgDlgOk'
    DParent = DMsgDlg
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DMsgDlgYes: TDButton
    Left = 24
    Top = 304
    Width = 69
    Height = 24
    OnDirectPaint = DMsgDlgOkDirectPaint
    OnClick = DMsgDlgOkClick
    Caption = 'DMsgDlgYes'
    DParent = DMsgDlg
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DMsgDlgCancel: TDButton
    Left = 112
    Top = 272
    Width = 69
    Height = 24
    OnDirectPaint = DMsgDlgOkDirectPaint
    OnClick = DMsgDlgOkClick
    Caption = 'DMsgDlgCancel'
    DParent = DMsgDlg
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DMsgDlgNo: TDButton
    Left = 108
    Top = 304
    Width = 69
    Height = 24
    OnDirectPaint = DMsgDlgOkDirectPaint
    OnClick = DMsgDlgOkClick
    Caption = 'DMsgDlgNo'
    DParent = DMsgDlg
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DNextState: TDButton
    Left = 644
    Top = 108
    Width = 29
    Height = 33
    OnDirectPaint = DPrevStateDirectPaint
    OnClick = DNextStateClick
    Caption = 'Next'
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csGlass
    OnClickSound = DLoginNewClickSound
  end
  object DSWNecklace: TDButton
    Left = 592
    Top = 28
    Width = 29
    Height = 29
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWLight: TDButton
    Left = 584
    Top = 64
    Width = 29
    Height = 29
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWArmRingR: TDButton
    Left = 528
    Top = 104
    Width = 29
    Height = 29
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWArmRingL: TDButton
    Left = 584
    Top = 104
    Width = 29
    Height = 29
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWRingR: TDButton
    Left = 528
    Top = 140
    Width = 29
    Height = 29
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWRingL: TDButton
    Left = 584
    Top = 140
    Width = 29
    Height = 29
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWWeapon: TDButton
    Left = 528
    Top = 48
    Width = 25
    Height = 41
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWDress: TDButton
    Left = 560
    Top = 48
    Width = 21
    Height = 113
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWHelmet: TDButton
    Left = 552
    Top = 16
    Width = 29
    Height = 29
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DChgPw: TDWindow
    Left = 8
    Top = 632
    Width = 161
    Height = 81
    Caption = 'ChgPw'
    DParent = DBackground
    Visible = False
    EnableFocus = False
    ClickCount = csNone
    Floating = False
  end
  object DChgpwOk: TDButton
    Left = 40
    Top = 684
    Width = 49
    Height = 25
    OnDirectPaint = DPrevStateDirectPaint
    OnClick = DChgpwOkClick
    Caption = 'OK'
    DParent = DChgPw
    Visible = True
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DChgpwCancel: TDButton
    Left = 108
    Top = 684
    Width = 49
    Height = 25
    OnDirectPaint = DPrevStateDirectPaint
    OnClick = DChgpwOkClick
    Caption = 'Cancel'
    DParent = DChgPw
    Visible = True
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DMerchantDlg: TDWindow
    Left = 208
    Top = 320
    Width = 119
    Height = 41
    OnDirectPaint = DMerchantDlgDirectPaint
    OnMouseDown = DMerchantDlgMouseDown
    OnMouseUp = DMerchantDlgMouseUp
    OnClick = DMerchantDlgClick
    Caption = 'NPC'
    DParent = DBackground
    Visible = False
    EnableFocus = False
    ClickCount = csNone
    Floating = False
  end
  object DMerchantDlgClose: TDButton
    Left = 296
    Top = 324
    Width = 21
    Height = 17
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DMerchantDlgCloseClick
    Caption = 'X'
    DParent = DMerchantDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNorm
    OnClickSound = DLoginNewClickSound
  end
  object DMenuDlg: TDWindow
    Left = 336
    Top = 216
    Width = 153
    Height = 49
    OnDirectPaint = DMenuDlgDirectPaint
    OnMouseMove = DMenuDlgMouseMove
    OnClick = DMenuDlgClick
    DParent = DBackground
    Visible = False
    EnableFocus = False
    ClickCount = csNone
    Floating = False
  end
  object DMenuPrev: TDButton
    Left = 348
    Top = 220
    Width = 25
    Height = 24
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DMenuPrevClick
    Caption = '<-'
    DParent = DMenuDlg
    Visible = True
    EnableFocus = False
    ClickCount = csGlass
    OnClickSound = DLoginNewClickSound
  end
  object DMenuNext: TDButton
    Left = 384
    Top = 220
    Width = 25
    Height = 24
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DMenuNextClick
    Caption = '->'
    DParent = DMenuDlg
    Visible = True
    EnableFocus = False
    ClickCount = csGlass
    OnClickSound = DLoginNewClickSound
  end
  object DMenuBuy: TDButton
    Left = 436
    Top = 220
    Width = 25
    Height = 24
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DMenuBuyClick
    Caption = 'Buy'
    DParent = DMenuDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNorm
    OnClickSound = DLoginNewClickSound
  end
  object DMenuClose: TDButton
    Left = 468
    Top = 220
    Width = 17
    Height = 25
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DMenuCloseClick
    Caption = 'X'
    DParent = DMenuDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNorm
    OnClickSound = DLoginNewClickSound
  end
  object DSellDlg: TDWindow
    Left = 208
    Top = 256
    Width = 121
    Height = 61
    OnDirectPaint = DSellDlgDirectPaint
    Caption = 'Sell Dialog'
    DParent = DBackground
    Visible = False
    EnableFocus = False
    ClickCount = csNone
    Floating = False
  end
  object DSellDlgOk: TDButton
    Left = 276
    Top = 284
    Width = 25
    Height = 21
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DSellDlgOkClick
    Caption = 'OK'
    DParent = DSellDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNone
    OnClickSound = DLoginNewClickSound
  end
  object DSellDlgClose: TDButton
    Left = 300
    Top = 260
    Width = 25
    Height = 21
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DSellDlgCloseClick
    Caption = 'X'
    DParent = DSellDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNorm
    OnClickSound = DLoginNewClickSound
  end
  object DSellDlgSpot: TDButton
    Left = 216
    Top = 272
    Width = 41
    Height = 37
    OnDirectPaint = DSellDlgSpotDirectPaint
    OnMouseMove = DSellDlgSpotMouseMove
    OnClick = DSellDlgSpotClick
    DParent = DSellDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DStMag1: TDButton
    Left = 628
    Top = 28
    Width = 21
    Height = 17
    OnDirectPaint = DStMag1DirectPaint
    OnClick = DStMag1Click
    DParent = DStateWin
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DStMag2: TDButton
    Tag = 1
    Left = 628
    Top = 49
    Width = 21
    Height = 17
    OnDirectPaint = DStMag1DirectPaint
    OnClick = DStMag1Click
    DParent = DStateWin
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DStMag3: TDButton
    Tag = 2
    Left = 628
    Top = 70
    Width = 21
    Height = 17
    OnDirectPaint = DStMag1DirectPaint
    OnClick = DStMag1Click
    DParent = DStateWin
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DStMag4: TDButton
    Tag = 3
    Left = 628
    Top = 91
    Width = 21
    Height = 17
    OnDirectPaint = DStMag1DirectPaint
    OnClick = DStMag1Click
    DParent = DStateWin
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DStMag5: TDButton
    Tag = 4
    Left = 628
    Top = 112
    Width = 21
    Height = 17
    OnDirectPaint = DStMag1DirectPaint
    OnClick = DStMag1Click
    DParent = DStateWin
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DKeySelDlg: TDWindow
    Left = 400
    Top = 368
    Width = 230
    Height = 95
    OnDirectPaint = DKeySelDlgDirectPaint
    Caption = '???'
    DParent = DBackground
    Visible = False
    EnableFocus = False
    ClickCount = csNone
    Floating = True
  end
  object DKsIcon: TDButton
    Left = 404
    Top = 372
    Width = 25
    Height = 25
    OnDirectPaint = DKsIconDirectPaint
    DParent = DKeySelDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DKsF1: TDButton
    Left = 404
    Top = 398
    Width = 25
    Height = 18
    OnDirectPaint = DKsF1DirectPaint
    OnClick = DKsF1Click
    Caption = 'F1'
    DParent = DKeySelDlg
    Visible = True
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DKsF2: TDButton
    Left = 432
    Top = 398
    Width = 25
    Height = 18
    OnDirectPaint = DKsF1DirectPaint
    OnClick = DKsF1Click
    Caption = 'F2'
    DParent = DKeySelDlg
    Visible = True
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DKsF3: TDButton
    Left = 460