unit1.dfm

自己写的一个完美国际173版的读取角色信息的挂 delphi 7源码

object Form1: TForm1
  Left = 192
  Top = 289
  Width = 308
  Height = 343
  Caption = 'Form1'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object rzstsbr_1: TRzStatusBar
    Left = 0
    Top = 286
    Width = 300
    Height = 19
    BorderInner = fsNone
    BorderOuter = fsNone
    BorderSides = [sdLeft, sdTop, sdRight, sdBottom]
    BorderWidth = 0
    TabOrder = 0
  end
  object pgc_1: TPageControl
    Left = 0
    Top = 0
    Width = 300
    Height = 286
    ActivePage = ts_2
    Align = alClient
    TabOrder = 1
    object ts_1: TTabSheet
      Caption = 'ts_1'
      object pnl_1: TPanel
        Left = 0
        Top = 0
        Width = 292
        Height = 33
        Align = alTop
        TabOrder = 0
        object RzToolbar1: TRzToolbar
          Left = 1
          Top = 1
          Width = 290
          Height = 29
          BorderInner = fsNone
          BorderOuter = fsGroove
          BorderSides = [sdTop]
          BorderWidth = 0
          TabOrder = 0
          ToolbarControls = (
            RzToolButton2
            RzToolButton3
            RzToolButton1)
          object RzToolButton2: TRzToolButton
            Left = 4
            Top = 2
            Width = 36
            ShowCaption = True
            UseToolbarShowCaption = False
            Caption = #35835#21462
            OnClick = RzToolButton2Click
          end
          object RzToolButton3: TRzToolButton
            Left = 40
            Top = 2
            Width = 36
            ShowCaption = True
            UseToolbarShowCaption = False
            Caption = #24320#22987
            OnClick = RzToolButton3Click
          end
          object RzToolButton1: TRzToolButton
            Left = 76
            Top = 2
            Width = 36
            ShowCaption = True
            UseToolbarShowCaption = False
            Caption = #35774#32622
          end
        end
      end
      object mmo_1: TMemo
        Left = 0
        Top = 33
        Width = 292
        Height = 225
        Align = alClient
        Lines.Strings = (
          'mmo_1')
        ReadOnly = True
        TabOrder = 1
      end
    end
    object ts_2: TTabSheet
      Caption = #20449#24687
      ImageIndex = 1
      object grp_1: TGroupBox
        Left = 0
        Top = 0
        Width = 292
        Height = 105
        Align = alTop
        Caption = #35282#33394
        Color = clBtnFace
        ParentColor = False
        TabOrder = 0
        object lbl_1: TLabel
          Left = 8
          Top = 16
          Width = 36
          Height = 13
          Caption = #31561#32423#65306
        end
        object lbl_2: TLabel
          Left = 8
          Top = 32
          Width = 36
          Height = 13
          Caption = #29983#21629#65306
        end
        object lbl_3: TLabel
          Left = 152
          Top = 32
          Width = 36
          Height = 13
          Caption = #30495#27668#65306
        end
        object lbl_4: TLabel
          Left = 8
          Top = 48
          Width = 36
          Height = 13
          Caption = #20803#31070#65306
        end
        object lbl_5: TLabel
          Left = 8
          Top = 64
          Width = 60
          Height = 13
          Caption = #24403#21069#32463#39564#65306
        end
        object lbl_6: TLabel
          Left = 8
          Top = 80
          Width = 36
          Height = 13
          Caption = #22352#26631#65306
        end
        object lbl_7: TLabel
          Left = 152
          Top = 16
          Width = 36
          Height = 13
          Caption = #22768#26395#65306
        end
        object lbl_LEVEL: TLabel
          Left = 40
          Top = 16
          Width = 18
          Height = 13
          Caption = '000'
        end
        object lbl_CURMP: TLabel
          Left = 184
          Top = 32
          Width = 30
          Height = 13
          Caption = '00000'
        end
        object lbl_CURHP: TLabel
          Left = 40
          Top = 32
          Width = 30
          Height = 13
          Caption = '00000'
        end
        object lbl_VIGOUR: TLabel
          Left = 40
          Top = 48
          Width = 60
          Height = 13
          Caption = '0000000000'
        end
        object lbl_EXPER: TLabel
          Left = 64
          Top = 64
          Width = 48
          Height = 13
          Caption = '00000000'
        end
        object lbl_HONOR: TLabel
          Left = 184
          Top = 16
          Width = 36
          Height = 13
          Caption = '000000'
        end
        object lbl_X: TLabel
          Left = 40
          Top = 80
          Width = 18
          Height = 13
          Caption = '000'
        end
      end
    end
  end
end