archiveeditunit.dfm

游戏克星江湖行游戏修改工具全部源码,功能很强的。

          FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00488CFF00}
        ParentShowHint = False
        ShowHint = False
        Transparent = False
        OnClick = EditFile_SbClick
      end
      object InputHelp_SB: TSpeedButton
        Left = 163
        Top = 9
        Width = 24
        Height = 24
        Flat = True
        Glyph.Data = {
          36050000424D3605000000000000360400002800000010000000100000000100
          080000000000000100000000000000000000000100000001000000000000FFFF
          FF0000000000FFFBFF00F7F3F700EFEBEF00FFF3F700FFEFEF00F7E7E700FFF7
          F700F7EFEF00EFE7E700FFD7D600B296950053464500EFCBC600DED7D600F7DB
          D600FFE3DE00FFEBE700E7D3CE00F7D7CE00FFDFD600DECBC600E7C7BD00EFB2
          9C00DEBAAD00E7CFC600EFD7CE00F7DFD600FFE7DE00FFF3EF00F7EBE700C686
          6B00B5928400C6A29400EFE3DE00E7DBD600BD5D3100D6693900C6653900DE71
          4200D6714200CE6D4200DE794A00D6754A00FF9A6B00DE9A7B00EFAA8C00D69E
          8400E7AE9400DEAA9400EFC7B500BDA69C00EFD3C600F7DBCE00FFE3D600BDB2
          AD00CE653100C6613100D66D3900CE693900C6693900DE754200BD653900E77D
          4A00CE714200EF865200E7825200F78E5A00EF8A5A00FF966300EF926300F79A
          6B00BD755200FFA27300C67D5A00D68A6300FFA67B00DE926B00CE866300EFA2
          7B00BD866B00D69A7B00C68E7300FFBE9C00B58E7B00DEB29C00EFC3AD00FFD3
          BD00E7CBBD00FFEFE700BD5D2900CE693100C6653100D6713900CE6D3900DE79
          4200D6754200E7824A00F7925A00D6825200FF9A6300D6865A00EF9E7300CE8A
          6300CE8E6B00BD826300D6967300FFB68C00DE9E7B00C6967B00D6A68C00F7C7
          AD00FFCFB500DEBEAD00E7C7B500EFCFBD00F7E7DE00E78E5A00FFA26B00FFAE
          7B00FFAA7300FFB68400CEA68C00EFDBCE00F7E3D600FFEBDE00D6C7BD00FFB2
          7B00FFBE8C00FFBA8400FFDFC600FFC79400FFF7EF00FFFBF700F7F3EF00FFD7
          AD00FFD39C00FFD7A500FFDFAD00FFEFD600FFEBB500FFF3C600FFFBD600FFFB
          C600FFFFE700FFFFEF00DEDFDE00D6D7D600CECFCE00BDBEBD00F7F7F700EFEF
          EF00E7E7E700FFFFFF0000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          0000000000000000000000000000000000000000000000000000000000000000
          000000000000000000000000000000000000000000000000000096969696960E
          0E0E0E0E0E969696969696969656227E2424767E350E0E969696969635760625
          57701805047E5A0E969696352001545C5C575C5C310476800E969635012B5C5C
          2301445C5C6C877E0E9635036E5C3A3A3D4D3A3A5C5C5A0A170E80093B5C3A5C
          5076275C3A5C42015A0E801D5C3A3A5C6503325C5C3A5C071D0E80153A3A3A3A
          5C3309685C3A5C88240E805B273A3A5C5C5C1B01273A3D031D0E800149276A20
          655C6C01775C4801800E96807F434498011A0198295F1F080E969680018D7A30
          2499084E45370180969696968001018F8C8A8589010180969696969696808001
          0101010317809696969696969696961780808080969696969696}
        OnClick = InputHelp_SBClick
      end
      object Value_Edit: TEdit
        Left = 54
        Top = 8
        Width = 100
        Height = 24
        BevelInner = bvNone
        BevelKind = bkSoft
        BorderStyle = bsNone
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        Text = '200'
        OnKeyPress = Value_EditKeyPress
      end
      object VarType_CB: TComboBox
        Left = 193
        Top = 8
        Width = 100
        Height = 24
        BevelInner = bvNone
        BevelKind = bkSoft
        Style = csDropDownList
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        ItemHeight = 16
        ItemIndex = 0
        ParentFont = False
        TabOrder = 1
        Text = 'Auto Type'
        OnChange = VarType_CBChange
        Items.Strings = (
          'Auto Type'
          'Byte Type'
          'Word Type'
          'DWord Type'
          'Int64 Type'
          'Single'
          'Double'
          'Text')
      end
      object Panel3: TPanel
        Left = 2
        Top = 38
        Width = 482
        Height = 18
        Align = alBottom
        BevelInner = bvLowered
        BevelOuter = bvNone
        TabOrder = 2
        object File_Info_SearchResult_LB: TLabel
          Left = 314
          Top = 1
          Width = 167
          Height = 16
          Align = alRight
          Alignment = taRightJustify
          BiDiMode = bdRightToLeftReadingOnly
          Caption = #25628#32034#27425#25968': 0 ,'#32467#26524#25968#30446': 0 '
          Font.Charset = ANSI_CHARSET
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentBiDiMode = False
          ParentFont = False
          Transparent = True
        end
        object File_info_Name_LB: TLabel
          Left = 1
          Top = 1
          Width = 150
          Height = 16
          Align = alLeft
          Caption = #27809#26377#25991#20214#25628#32034#20219#21153','#35831#21152#20837
          Font.Charset = ANSI_CHARSET
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = #23435#20307
          Font.Style = []
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          Transparent = False
        end
      end
      object StaticText1: TStaticText
        Left = 10
        Top = 14
        Width = 37
        Height = 17
        Caption = #36755#20837':'
        TabOrder = 3
        Transparent = False
      end
    end
    object Edit_LV: TListView
      Left = 2
      Top = 209
      Width = 486
      Height = 200
      Align = alClient
      Color = clBtnFace
      Columns = <
        item
          AutoSize = True
          Caption = #26631#24535
          MinWidth = 50
        end
        item
          AutoSize = True
          Caption = #22320#22336
          MinWidth = 50
        end
        item
          AutoSize = True
          Caption = #25968#25454
          MinWidth = 50
        end
        item
          AutoSize = True
          Caption = #31867#22411
          MinWidth = 50
        end
        item
          AutoSize = True
          Caption = #25991#20214
        end>
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      MultiSelect = True
      RowSelect = True
      ParentFont = False
      PopupMenu = PopupMenu3
      TabOrder = 1
      ViewStyle = vsReport
      OnDblClick = ModifyFileEditClick
      OnMouseDown = Edit_LVMouseDown
    end
    object Found_LV: TListView
      Left = 2
      Top = 63
      Width = 486
      Height = 141
      Align = alTop
      AllocBy = 1000
      Columns = <
        item
          AutoSize = True
          Caption = #22320#22336
          MinWidth = 55
        end
        item
          AutoSize = True
          Caption = 'Byte'
          MinWidth = 55
        end
        item
          AutoSize = True
          Caption = 'Word'
          MinWidth = 55
        end
        item
          AutoSize = True
          Caption = 'DWord'
          MinWidth = 55
        end
        item
          AutoSize = True
          Caption = 'Int64'
          MinWidth = 55
        end
        item
          AutoSize = True
          Caption = 'Single'
          MinWidth = 55
        end
        item
          AutoSize = True
          Caption = 'Double'
          MinWidth = 55