umainform2.dfm

Delphi函数工厂。。。。。。。。。。。。。

object fmMain: TfmMain
  Left = 679
  Top = 109
  AutoScroll = False
  BorderIcons = []
  Caption = #20989#25968#24037#21378
  ClientHeight = 475
  ClientWidth = 115
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 12
  object skinButtonsBar: TbsSkinButtonsBar
    Left = 0
    Top = 0
    Width = 115
    Height = 445
    TabOrder = 0
    SkinData = skinData
    SkinDataName = 'panel'
    DefaultFont.Charset = DEFAULT_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = 12
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    DefaultWidth = 0
    DefaultHeight = 0
    UseSkinFont = False
    AutoEnabledControls = True
    CheckedMode = False
    Checked = False
    DefaultAlignment = taLeftJustify
    DefaultCaptionHeight = 22
    BorderStyle = bvFrame
    CaptionMode = False
    RollUpMode = False
    RollUpState = False
    NumGlyphs = 1
    Spacing = 2
    Align = alClient
    OnMouseMove = skinButtonsBarMouseMove
    DefaultSectionFont.Charset = DEFAULT_CHARSET
    DefaultSectionFont.Color = clWindowText
    DefaultSectionFont.Height = 12
    DefaultSectionFont.Name = #23435#20307
    DefaultSectionFont.Style = []
    DefaultButtonHeight = 25
    DefaultItemFont.Charset = DEFAULT_CHARSET
    DefaultItemFont.Color = clWindowText
    DefaultItemFont.Height = 12
    DefaultItemFont.Name = #23435#20307
    DefaultItemFont.Style = []
    SectionButtonSkinDataName = 'toolbutton'
    ItemHeight = 60
    ItemsTransparent = True
    ItemImages = ilButtons
    Sections = <
      item
        Text = #20989#25968#20195#30721#26500#36896#22120
        Items = <
          item
            Text = #21457#37038#20214#20989#25968
            ImageIndex = 3
            OnClick = bsSkinButtonsBar1Sections0Items0Click
          end
          item
            Text = #23545#35805#26694#20989#25968
            ImageIndex = 0
            OnClick = bsSkinButtonsBar1Sections0Items1Click
          end
          item
            Text = #38190#20540#26597#35810
            ImageIndex = 2
            OnClick = bsSkinButtonsBar1Sections0Items2Click
          end
          item
            Text = 'ASCII'#30721#26597#35810
            ImageIndex = 4
            OnClick = bsSkinButtonsBar1Sections0Items3Click
          end
          item
            Text = #27880#37322#22359#26500#36896#22120
            ImageIndex = 1
            OnClick = bsSkinButtonsBar1Sections0Items4Click
          end>
        OnClick = SectionsSoundClick
        ImageIndex = 0
      end
      item
        Text = #20989#25968#20179#24211
        Items = <
          item
            Text = 'Delphi '#24120#29992#20989#25968
            ImageIndex = 8
            OnClick = skinButtonsBarSections1Items0Click
          end
          item
            Text = 'API '#20989#25968
            ImageIndex = 9
            OnClick = skinButtonsBarSections1Items1Click
          end
          item
            Text = #20989#25968#24211
            ImageIndex = 10
            OnClick = skinButtonsBarSections1Items2Click
          end>
        OnClick = SectionsSoundClick
        ImageIndex = 0
      end
      item
        Text = #36741#21161#24037#20855
        Items = <
          item
            Text = #35745#31639#22120
            ImageIndex = 5
            OnClick = skinButtonsBarSections2Items0Click
          end
          item
            Text = 'ACCESS'#24037#20855
            ImageIndex = 6
            OnClick = skinButtonsBarSections2Items1Click
          end
          item
            Text = 'Delphi'#25991#20214#24037#20855
            ImageIndex = 11
            OnClick = skinButtonsBarSections2Items2Click
          end
          item
            Text = #36164#28304#25991#20214#21046#20316#22120
            ImageIndex = 12
            OnClick = skinButtonsBarSections2Items3Click
          end
          item
            Text = #20851#20110'...'
            ImageIndex = 7
            OnClick = skinButtonsBarSections2Items4Click
          end>
        OnClick = SectionsSoundClick
        ImageIndex = 0
      end>
    SectionIndex = 0
  end
  object pnlAddButtons: TbsSkinPanel
    Left = 0
    Top = 445
    Width = 115
    Height = 30
    TabOrder = 1
    SkinData = skinData
    SkinDataName = 'panel'
    DefaultFont.Charset = DEFAULT_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = 12
    DefaultFont.Name = #23435#20307
    DefaultFont.Style = []
    DefaultWidth = 0
    DefaultHeight = 0
    UseSkinFont = True
    AutoEnabledControls = True
    CheckedMode = False
    Checked = False
    DefaultAlignment = taLeftJustify
    DefaultCaptionHeight = 22
    BorderStyle = bvRaised
    CaptionMode = False
    RollUpMode = False
    RollUpState = False
    NumGlyphs = 1
    Spacing = 2
    Align = alBottom
    object btnAdd: TbsSkinSpeedButton
      Left = 0
      Top = 2
      Width = 57
      Height = 25
      SkinData = skinData
      SkinDataName = 'toolbutton'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 12
      DefaultFont.Name = #23435#20307
      DefaultFont.Style = []
      DefaultWidth = 0
      DefaultHeight = 0
      UseSkinFont = True
      RepeatMode = False
      RepeatInterval = 100
      Transparent = False
      Flat = False
      AllowAllUp = False
      Down = False
      GroupIndex = 0
      Caption = #26032#22686
      NumGlyphs = 2
      Spacing = 1
      OnClick = btnAddClick
    end
    object btnModify: TbsSkinSpeedButton
      Left = 56
      Top = 2
      Width = 67
      Height = 25
      SkinData = skinData
      SkinDataName = 'toolbutton'
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 12
      DefaultFont.Name = #23435#20307
      DefaultFont.Style = []
      DefaultWidth = 0
      DefaultHeight = 0
      UseSkinFont = True
      RepeatMode = False
      RepeatInterval = 100
      Transparent = False
      Flat = False
      AllowAllUp = False
      Down = False
      GroupIndex = 0
      Caption = #20462#25913
      NumGlyphs = 2
      Spacing = 1
      OnClick = btnModifyClick
    end
  end
  object skinData: TbsSkinData
    StoredSkin = skinStoredSkin
    Left = 8
    Top = 72
  end
  object skinStoredSkin: TbsStoredSkin
    FileName = 'skin.ini'
    IniStrings.Strings = (
      '[VERSION]'
      'ver=1'
      'skinname=WinAqua'
      'skinauthor='
      'authoremail='
      'authorurl='
      'skincomments='
      ''
      '[PICTURES]'
      'picture=main.bmp'
      'inactivepicture='
      'mask=mask.bmp'
      'activepicturescount=7'
      '0=active.bmp'
      '1=hintwindow.bmp'
      '2=popupwindow.bmp'
      '3=menuitems.bmp'
      '4=controls.bmp'
      '5=grids.bmp'
      '6=buttonmask.bmp'
      ''
      '[FORMINFO]'
      'lefttoppoint=21,23'
      'righttoppoint=33,23'
      'leftbottompoint=2,58'
      'rightbottompoint=101,58'
      'clientrect=2,23,102,59'
      'bgpictureindex=-1'
      'maskrectarea=2,4,102,59'
      'hittestlefttoppoint=7,6'
      'hittestrighttoppoint=96,7'
      'hittestleftbottompoint=5,55'
      'hittestrightbottompoint=98,56'
      'mainmenurect=0,0,0,0'
      'iconrect=0,0,0,0'
      'mainmenupopupup=0'
      'borderwidth=3'
      'autorenderinginactiveimage=1'
      'inactiveeffect=iegrayscale'
      ''
      '[POPUPWINDOW]'
      'windowpictureindex=2'
      'maskpictureindex=-1'
      'lefttoppoint=1,1'
      'righttoppoint=44,1'
      'leftbottompoint=1,40'
      'rightbottompoint=44,40'
      'itemsrect=1,1,45,41'
      'scrollmarkercolor=8421504'
      'scrollmarkeractivecolor=0'
      ''
      '[HINTWINDOW]'
      'windowpictureindex=1'
      'maskpictureindex=-1'
      'lefttoppoint=5,4'
      'righttoppoint=22,4'
      'leftbottompoint=5,10'
      'rightbottompoint=22,10'
      'clientrect=4,2,24,14'
      'fontname='#23435#20307
      'fontheight=-12'
      'fontstyle='
      'fontcolor=16777215'
      ''
      '[SKINOBJECTS]'
      'count=12'
      '0=closebutton:stdbutton'
      '1=maxbutton:stdbutton'
      '2=minbutton:stdbutton'
      '3=rollupbutton:stdbutton'
      '4=sysmenubutton:stdbutton'
      '5=caption:caption'
      '6=menuitem:menuitem'
      '7=mainmenubaritem:mainmenubaritem'
      '8=menubarsysmenubutton:mainmenubarbutton'
      '9=menubarclosebutton:mainmenubarbutton'
      '10=menubarmaxbutton:mainmenubarbutton'
      '11=menubarminbutton:mainmenubarbutton'
      ''
      '[closebutton]'
      'hint=Close'
      'activepictureindex=0'
      'skinrect=85,4,98,18'
      'activeskinrect=1,0,14,14'
      'morphing=1'
      'morphkind=mkdefault'
      'downrect=0,0,0,0'
      'disableskinrsect=0,0,0,0'
      'command=cmclose'
      'restorerect=0,0,0,0'
      'restoreactiverect=0,0,0,0'
      'restoredownrect=0,0,0,0'
      'restoreinactiverect=0,0,0,0'
      ''
      '[maxbutton]'
      'hint=Maximize'
      'activepictureindex=0'
      'skinrect=69,4,82,18'
      'activeskinrect=1,17,14,31'
      'morphing=1'
      'morphkind=mkdefault'
      'downrect=0,0,0,0'
      'disableskinrsect=0,0,0,0'
      'command=cmmaximize'
      'restorerect=0,0,0,0'
      'restoreactiverect=0,0,0,0'
      'restoredownrect=0,0,0,0'
      'restoreinactiverect=0,0,0,0'
      ''
      '[minbutton]'
      'hint=Minimize'
      'activepictureindex=0'
      'skinrect=53,4,66,18'
      'activeskinrect=1,34,14,48'
      'morphing=1'
      'morphkind=mkdefault'
      'downrect=0,0,0,0'
      'disableskinrsect=0,0,0,0'
      'command=cmminimize'
      'restorerect=0,0,0,0'
      'restoreactiverect=0,0,0,0'
      'restoredownrect=0,0,0,0'
      'restoreinactiverect=0,0,0,0'
      ''
      '[rollupbutton]'
      'hint=RollUp'
      'activepictureindex=0'
      'skinrect=37,4,50,18'
      'activeskinrect=30,0,43,14'
      'morphing=1'
      'morphkind=mkdefault'
      'downrect=0,0,0,0'
      'disableskinrsect=0,0,0,0'
      'command=cmrollup'
      'restorerect=0,0,0,0'
      'restoreactiverect=0,0,0,0'
      'restoredownrect=0,0,0,0'
      'restoreinactiverect=0,0,0,0'
      ''
      '[sysmenubutton]'
      'hint=System menu'
      'activepictureindex=0'