unit1.dfm

精彩的delphi源码

object Form1: TForm1
  Left = 87
  Top = 105
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 
    '                                                                ' +
    '         '#36890#35759#24405
  ClientHeight = 454
  ClientWidth = 750
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {
    0000010001002020000000000000A80800001600000028000000200000004000
    000001000800000000008004000000000000000000000001000000000000FFFF
    FF00CCFFFF0099FFFF0066FFFF0033FFFF0000FFFF00FFCCFF00CCCCFF0099CC
    FF0066CCFF0033CCFF0000CCFF00FF99FF00CC99FF009999FF006699FF003399
    FF000099FF00FF66FF00CC66FF009966FF006666FF003366FF000066FF00FF33
    FF00CC33FF009933FF006633FF003333FF000033FF00FF00FF00CC00FF009900
    FF006600FF003300FF000000FF00FFFFCC00CCFFCC0099FFCC0066FFCC0033FF
    CC0000FFCC00FFCCCC00CCCCCC0099CCCC0066CCCC0033CCCC0000CCCC00FF99
    CC00CC99CC009999CC006699CC003399CC000099CC00FF66CC00CC66CC009966
    CC006666CC003366CC000066CC00FF33CC00CC33CC009933CC006633CC003333
    CC000033CC00FF00CC00CC00CC009900CC006600CC003300CC000000CC00FFFF
    9900CCFF990099FF990066FF990033FF990000FF9900FFCC9900CCCC990099CC
    990066CC990033CC990000CC9900FF999900CC99990099999900669999003399
    990000999900FF669900CC66990099669900666699003366990000669900FF33
    9900CC33990099339900663399003333990000339900FF009900CC0099009900
    9900660099003300990000009900FFFF6600CCFF660099FF660066FF660033FF
    660000FF6600FFCC6600CCCC660099CC660066CC660033CC660000CC6600FF99
    6600CC99660099996600669966003399660000996600FF666600CC6666009966
    6600666666003366660000666600FF336600CC33660099336600663366003333
    660000336600FF006600CC00660099006600660066003300660000006600FFFF
    3300CCFF330099FF330066FF330033FF330000FF3300FFCC3300CCCC330099CC
    330066CC330033CC330000CC3300FF993300CC99330099993300669933003399
    330000993300FF663300CC66330099663300666633003366330000663300FF33
    3300CC33330099333300663333003333330000333300FF003300CC0033009900
    3300660033003300330000003300FFFF0000CCFF000099FF000066FF000033FF
    000000FF0000FFCC0000CCCC000099CC000066CC000033CC000000CC0000FF99
    0000CC99000099990000669900003399000000990000FF660000CC6600009966
    0000666600003366000000660000FF330000CC33000099330000663300003333
    000000330000FF000000CC0000009900000066000000330000000000EE000000
    DD000000BB000000AA0000008800000077000000550000004400000022000000
    110000EE000000DD000000BB000000AA00000088000000770000005500000044
    00000022000000110000EE000000DD000000BB000000AA000000880000007700
    000055000000440000002200000011000000EEEEEE00DDDDDD00BBBBBB00AAAA
    AA0088888800777777005555550044444400222222001111110000000000FFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFFFFFFFF313131FFFFFFFFFFFF141414FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFFFFFF3162626231FFFFFFFF1414141414FFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFFFF31626262626231FFFF14141B1B1B1414FFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFF31626262626262623114141B1B1B1B1B1414FFFFFFFFFFFFFFFFFFFFFFFF
    FF31626262626262626262311B1B1B1B1B1B1B1414FFFFFFFFFFFFFFFFFFFFFF
    316262626262626262626262311B1B1B1B1B1B1B1414FFFFFFFFFFFFFFFFFF31
    62626262626262626262626262311B1B1B1B1B1B1B1414FFFFFFFFFFFFFFFF31
    62626262626262626262376262311B1B1B1B1B1B1B1B1414FFFFFFFFFFFFFF31
    62626262626262626237316262311B1B1B1B1B1B1B1B1B1414FFFFFFFFFFFF31
    62626262626262626231626262311B1B1B1B1B1B1B1B1B1B1414FFFFFFFFFFFF
    316262626262316262626262311B1B1B1B1B1B1B1B1B1B1B1B1414FFFFFFFFFF
    FF31626262311B31626262311B1B1B1B1B1B1B1B1B1B1B1B1B1B1414FFFFFFFF
    FFFF3131311B1B1B3131311B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B140DFFFFFF
    FFFF141A1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1A14FFFFFF
    FF0D141B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B140DFFFF
    FF14141B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1414FFFF
    FF141A1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1A14FFFF
    FF141A1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1A14FFFF
    FF141A1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B06141B1A14FFFF
    FF14141B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B0D06141B1414FFFF
    FF0D141B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B0606141B1B140DFFFF
    FFFF141A1B1B1B1B1B1B1B1B1B1B1B151B1B1B1B1B1B1B14141B1B1A14FFFFFF
    FFFF0D141B1B1B1B1B1B1B1B1B14FFFFFF141B1B1B1B1B1B1B1B1B140DFFFFFF
    FFFFFF0D141A1B1B1B1B1B1B14FFFFFFFFFF141B1B1B1B1B1B1A140DFFFFFFFF
    FFFFFFFF0D141B1B1B1B140DFFFFFFFFFFFFFF0D141B1B1B1B140DFFFFFFFFFF
    FFFFFFFFFFFF0D14140DFFFFFFFFFFFFFFFFFFFFFF0D14140DFFFFFFFFFFFFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
    FFFFFFFFFFFFFFFFFFFFFE3F1FFFFC1E0FFFF80C07FFF00003FFE00001FFC000
    00FF8000007F8000003F8000001F8000000FC0000007E0000003F0000001F000
    0001E0000000E0000000E0000000E0000000E0000000E0000000E0000000F000
    0001F000E001F801F003FC03F807FF0FFE1FFFFFFFFFFFFFFFFFFFFFFFFF}
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object bsSkinPanel1: TbsSkinPanel
    Left = 24
    Top = 16
    Width = 177
    Height = 417
    TabOrder = 0
    SkinData = bsSkinData1
    SkinDataName = 'panel'
    DefaultFont.Charset = DEFAULT_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = 14
    DefaultFont.Name = 'Arial'
    DefaultFont.Style = []
    DefaultWidth = 0
    DefaultHeight = 0
    UseSkinFont = True
    RealHeight = -1
    AutoEnabledControls = True
    CheckedMode = False
    Checked = False
    DefaultAlignment = taLeftJustify
    DefaultCaptionHeight = 22
    BorderStyle = bvFrame
    CaptionMode = False
    RollUpMode = False
    RollUpState = False
    NumGlyphs = 1
    Spacing = 2
    Caption = 'bsSkinPanel1'
    object TreeView1: TbsSkinTreeView
      Left = 8
      Top = 8
      Width = 145
      Height = 401
      VScrollBar = bsSkinScrollBar3
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      UseSkinFont = True
      SkinData = bsSkinData1
      SkinDataName = 'treeview'
      DefaultColor = clWindow
      AutoExpand = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = 14
      Font.Name = 'Arial'
      Font.Style = []
      Images = ImageList1
      Indent = 19
      ParentFont = False
      ReadOnly = True
      StateImages = ImageList1
      TabOrder = 0
      OnClick = TreeView1Click
    end
    object bsSkinScrollBar3: TbsSkinScrollBar
      Left = 152
      Top = 8
      Width = 19
      Height = 401
      TabOrder = 1
      Visible = False
      SkinData = bsSkinData1
      SkinDataName = 'vscrollbar'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      DefaultWidth = 19
      DefaultHeight = 0
      UseSkinFont = True
      Both = False
      BothMarkerWidth = 19
      BothSkinDataName = 'bothhscrollbar'
      CanFocused = False
      Kind = sbVertical
      PageSize = 0
      Min = 0
      Max = 100
      Position = 0
      SmallChange = 1
      LargeChange = 1
    end
  end
  object bsSkinPanel2: TbsSkinPanel
    Left = 224
    Top = 40
    Width = 497
    Height = 153
    TabOrder = 1
    SkinData = bsSkinData1
    SkinDataName = 'panel'
    DefaultFont.Charset = DEFAULT_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = 14
    DefaultFont.Name = 'Arial'
    DefaultFont.Style = []
    DefaultWidth = 0
    DefaultHeight = 0
    UseSkinFont = True
    RealHeight = -1
    AutoEnabledControls = True
    CheckedMode = False
    Checked = False
    DefaultAlignment = taLeftJustify
    DefaultCaptionHeight = 22
    BorderStyle = bvFrame
    CaptionMode = False
    RollUpMode = False
    RollUpState = False
    NumGlyphs = 1
    Spacing = 2
    Caption = 'bsSkinPanel2'
    object bsSkinLabel1: TbsSkinLabel
      Left = 16
      Top = 16
      Width = 50
      Height = 21
      TabOrder = 0
      SkinData = bsSkinData1
      SkinDataName = 'label'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      DefaultWidth = 0
      DefaultHeight = 0
      UseSkinFont = True
      BorderStyle = bvFrame
      Caption = ' '#32534'    '#21495':'
      AutoSize = False
    end
    object bsSkinLabel2: TbsSkinLabel
      Left = 16
      Top = 48
      Width = 50
      Height = 21
      TabOrder = 1
      SkinData = bsSkinData1
      SkinDataName = 'label'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      DefaultWidth = 0
      DefaultHeight = 0
      UseSkinFont = True
      BorderStyle = bvFrame
      Caption = ' '#22995'    '#21517':'
      AutoSize = False
    end
    object bsSkinLabel3: TbsSkinLabel
      Left = 16
      Top = 80
      Width = 50
      Height = 21
      TabOrder = 2
      SkinData = bsSkinData1
      SkinDataName = 'label'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      DefaultWidth = 0
      DefaultHeight = 0
      UseSkinFont = True
      BorderStyle = bvFrame
      Caption = ' '#30005'    '#35805':'
      AutoSize = False
    end
    object bsSkinLabel4: TbsSkinLabel
      Left = 16
      Top = 112
      Width = 50
      Height = 21
      TabOrder = 3
      SkinData = bsSkinData1
      SkinDataName = 'label'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      DefaultWidth = 0
      DefaultHeight = 0
      UseSkinFont = True
      BorderStyle = bvFrame
      Caption = ' '#25163'    '#26426':'
      AutoSize = False
    end
    object bsSkinLabel5: TbsSkinLabel
      Left = 264
      Top = 16
      Width = 50