fstate.dfm

传奇源代码的delphi版本

    Width = 20
    Height = 20
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DccCloseClick
    Caption = 'X'
    DParent = DCreateChr
    Visible = True
    EnableFocus = False
    ClickCount = csNorm
    OnClickSound = DLoginNewClickSound
  end
  object DItemGrid: TDGrid
    Left = 192
    Top = 148
    Width = 63
    Height = 32
    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 = 43
    Top = 40
    Width = 50
    Height = 15
    OnDirectPaint = DLoginNewDirectPaint
    OnClick = DLoginChgPwClick
    Caption = 'ChgPw'
    DParent = DLogIn
    Visible = True
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DMsgDlg: TDWindow
    Left = 5
    Top = 190
    Width = 96
    Height = 45
    OnDirectPaint = DMsgDlgDirectPaint
    OnKeyDown = DMsgDlgKeyDown
    Caption = 'DMsgDlg'
    DParent = DBackground
    Visible = False
    EnableFocus = True
    ClickCount = csNone
    Floating = True
  end
  object DMsgDlgOk: TDButton
    Left = 11
    Top = 196
    Width = 40
    Height = 15
    OnDirectPaint = DMsgDlgOkDirectPaint
    OnClick = DMsgDlgOkClick
    Caption = 'Ok'
    DParent = DMsgDlg
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DMsgDlgYes: TDButton
    Left = 10
    Top = 215
    Width = 40
    Height = 15
    OnDirectPaint = DMsgDlgOkDirectPaint
    OnClick = DMsgDlgOkClick
    Caption = 'Yes'
    DParent = DMsgDlg
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DMsgDlgCancel: TDButton
    Left = 53
    Top = 196
    Width = 40
    Height = 15
    OnDirectPaint = DMsgDlgOkDirectPaint
    OnClick = DMsgDlgOkClick
    Caption = 'Cancel'
    DParent = DMsgDlg
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DMsgDlgNo: TDButton
    Left = 54
    Top = 215
    Width = 40
    Height = 15
    OnDirectPaint = DMsgDlgOkDirectPaint
    OnClick = DMsgDlgOkClick
    Caption = 'No'
    DParent = DMsgDlg
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DNextState: TDButton
    Left = 591
    Top = 83
    Width = 25
    Height = 25
    OnDirectPaint = DPrevStateDirectPaint
    OnClick = DNextStateClick
    Caption = 'Next'
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csGlass
    OnClickSound = DLoginNewClickSound
  end
  object DSWNecklace: TDButton
    Left = 551
    Top = 37
    Width = 20
    Height = 20
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWLight: TDButton
    Left = 551
    Top = 60
    Width = 20
    Height = 20
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWArmRingR: TDButton
    Left = 488
    Top = 88
    Width = 20
    Height = 20
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWArmRingL: TDButton
    Left = 552
    Top = 87
    Width = 20
    Height = 20
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWRingR: TDButton
    Left = 488
    Top = 109
    Width = 20
    Height = 20
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWRingL: TDButton
    Left = 553
    Top = 109
    Width = 20
    Height = 20
    OnDirectPaint = DSWLightDirectPaint
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWWeapon: TDButton
    Left = 496
    Top = 37
    Width = 18
    Height = 37
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWDress: TDButton
    Left = 518
    Top = 55
    Width = 21
    Height = 75
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DSWHelmet: TDButton
    Left = 517
    Top = 32
    Width = 22
    Height = 22
    OnMouseMove = DSWWeaponMouseMove
    OnClick = DSWWeaponClick
    DParent = DStateWin
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DChgPw: TDWindow
    Left = 188
    Top = 240
    Width = 95
    Height = 24
    Caption = 'ChgPw'
    DParent = DBackground
    Visible = False
    EnableFocus = False
    ClickCount = csNone
    Floating = False
  end
  object DChgpwOk: TDButton
    Left = 193
    Top = 246
    Width = 25
    Height = 15
    OnDirectPaint = DPrevStateDirectPaint
    OnClick = DChgpwOkClick
    Caption = 'OK'
    DParent = DChgPw
    Visible = True
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DChgpwCancel: TDButton
    Left = 234
    Top = 246
    Width = 40
    Height = 15
    OnDirectPaint = DPrevStateDirectPaint
    OnClick = DChgpwOkClick
    Caption = 'Cancel'
    DParent = DChgPw
    Visible = True
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DMerchantDlg: TDWindow
    Left = 188
    Top = 208
    Width = 93
    Height = 29
    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 = 267
    Top = 210
    Width = 10
    Height = 11
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DMerchantDlgCloseClick
    Caption = 'X'
    DParent = DMerchantDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNorm
    OnClickSound = DLoginNewClickSound
  end
  object DMenuDlg: TDWindow
    Left = 348
    Top = 80
    Width = 132
    Height = 28
    OnDirectPaint = DMenuDlgDirectPaint
    OnMouseMove = DMenuDlgMouseMove
    OnClick = DMenuDlgClick
    DParent = DBackground
    Visible = False
    EnableFocus = False
    ClickCount = csNone
    Floating = False
  end
  object DMenuPrev: TDButton
    Left = 359
    Top = 84
    Width = 20
    Height = 20
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DMenuPrevClick
    Caption = '<-'
    DParent = DMenuDlg
    Visible = True
    EnableFocus = False
    ClickCount = csGlass
    OnClickSound = DLoginNewClickSound
  end
  object DMenuNext: TDButton
    Left = 384
    Top = 84
    Width = 20
    Height = 20
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DMenuNextClick
    Caption = '->'
    DParent = DMenuDlg
    Visible = True
    EnableFocus = False
    ClickCount = csGlass
    OnClickSound = DLoginNewClickSound
  end
  object DMenuBuy: TDButton
    Left = 408
    Top = 84
    Width = 30
    Height = 20
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DMenuBuyClick
    Caption = 'Buy'
    DParent = DMenuDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNorm
    OnClickSound = DLoginNewClickSound
  end
  object DMenuClose: TDButton
    Left = 451
    Top = 84
    Width = 20
    Height = 20
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DMenuCloseClick
    Caption = 'X'
    DParent = DMenuDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNorm
    OnClickSound = DLoginNewClickSound
  end
  object DSellDlg: TDWindow
    Left = 104
    Top = 190
    Width = 81
    Height = 70
    OnDirectPaint = DSellDlgDirectPaint
    Caption = 'Sell Dialog'
    DParent = DBackground
    Visible = False
    EnableFocus = False
    ClickCount = csNone
    Floating = False
  end
  object DSellDlgOk: TDButton
    Left = 152
    Top = 231
    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 = 172
    Top = 191
    Width = 10
    Height = 10
    OnDirectPaint = DSalesCancelDirectPaintt
    OnClick = DSellDlgCloseClick
    Caption = 'X'
    DParent = DSellDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNorm
    OnClickSound = DLoginNewClickSound
  end
  object DSellDlgSpot: TDButton
    Left = 109
    Top = 195
    Width = 32
    Height = 34
    OnDirectPaint = DSellDlgSpotDirectPaint
    OnMouseMove = DSellDlgSpotMouseMove
    OnClick = DSellDlgSpotClick
    DParent = DSellDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DStMag1: TDButton
    Left = 574
    Top = 37
    Width = 15
    Height = 15
    OnDirectPaint = DStMag1DirectPaint
    OnClick = DStMag1Click
    DParent = DStateWin
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DStMag2: TDButton
    Tag = 1
    Left = 574
    Top = 54
    Width = 15
    Height = 15
    OnDirectPaint = DStMag1DirectPaint
    OnClick = DStMag1Click
    DParent = DStateWin
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DStMag3: TDButton
    Tag = 2
    Left = 574
    Top = 71
    Width = 15
    Height = 15
    OnDirectPaint = DStMag1DirectPaint
    OnClick = DStMag1Click
    DParent = DStateWin
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DStMag4: TDButton
    Tag = 3
    Left = 574
    Top = 88
    Width = 15
    Height = 15
    OnDirectPaint = DStMag1DirectPaint
    OnClick = DStMag1Click
    DParent = DStateWin
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DStMag5: TDButton
    Tag = 4
    Left = 574
    Top = 105
    Width = 15
    Height = 15
    OnDirectPaint = DStMag1DirectPaint
    OnClick = DStMag1Click
    DParent = DStateWin
    Visible = False
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DKeySelDlg: TDWindow
    Left = 135
    Top = 495
    Width = 223
    Height = 57
    OnDirectPaint = DKeySelDlgDirectPaint
    Caption = '???'
    DParent = DBackground
    Visible = False
    EnableFocus = False
    ClickCount = csNone
    Floating = True
  end
  object DKsIcon: TDButton
    Left = 155
    Top = 498
    Width = 18
    Height = 17
    OnDirectPaint = DKsIconDirectPaint
    DParent = DKeySelDlg
    Visible = True
    EnableFocus = False
    ClickCount = csNone
  end
  object DKsF1: TDButton
    Left = 139
    Top = 518
    Width = 25
    Height = 15
    OnDirectPaint = DKsF1DirectPaint
    OnClick = DKsF1Click
    Caption = 'F1'
    DParent = DKeySelDlg
    Visible = True
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DKsF2: TDButton
    Left = 166
    Top = 518
    Width = 25
    Height = 15
    OnDirectPaint = DKsF1DirectPaint
    OnClick = DKsF1Click
    Caption = 'F2'
    DParent = DKeySelDlg
    Visible = True
    EnableFocus = False
    ClickCount = csStone
    OnClickSound = DLoginNewClickSound
  end
  object DKsF3: TDButton
    Left = 193
    Top = 518