unitmain.dfm

参照上兴、鸽子等源码编写编写出来的。 编译环境：Delphi7+SP+DP+indy9等控件

        42050000424D4205000000000000360000002800000016000000130000000100
        1800000000000C05000000000000000000000000000000000000DEEFEFDFF0F2
        CFDDDEB1D5BFB3DCC0B8E0C6B9E0C6B6DDC4B5D8C2BAD0C9D1DFE2E6F8F9E3F4
        F4E0F2F2DEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEF0000DEEF
        EFE5F2FA5B8963029D021EB01C38B93745C34520931932AD312FA23057965FA7
        AEBBACC2C1CBDFDFE2F4F9E3F4F4DEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEF
        0000DEEFEFE6F3F859906228BD2750C6506ED66F57BA5597B88E60C2615AD15A
        46AB419782808D72737563637A7C7CBACCCFDDF0F3DFF0EFDEEFEFDEEFEFDEEF
        EFDEEFEF0000DEEFEFE2F5F7A9BBB42FA73067DC666DD06C94C487F3F7F570B6
        6E68D96872C071EFD0DCDEC3C3D3AAAAB988887E6565ABBABAE3F5F4DEEFEFDE
        EFEFDEEFEFDEEFEF0000DEEFEFDFF0F0E0EEF284A58B56C55168A34FBEC1B2DC
        D6CE99B6755BCA5679CA79E4C6D1D4C6C6CDBDBCC7A1A6CF96967E706FDDF1F6
        DEEFEFDEEFEFDEEFEFDEEFEF0000DEEFEFDEEFEFE4F4F2A2AEBC258AE52B9DFF
        239AFF2298FF178FFF6EAAEBFFDEE0D2A4A3CE7474D17979C8767BAA9292C1D0
        D0E1F3F2DEEFEFDEEFEFDEEFEFDEEFEF0000DEEFEFDFF0F0DDEBE85E8DB135A5
        F83EAAFF42A9FF44A9FF38ABFF2E90D4D1907FC46771C75A5BD66767A6645EB1
        C1C1E2F5F5DEEFEFDEEFEFDEEFEFDEEFEFDEEFEF0000DEEFEFE1F1F1CFDCDF44
        90B847BAFF53B8FF57C0FF58C2FF55BDFF2DA1E3E9A129E09674C0636CBC4D55
        805054C2D9DFE1F3F5DFF0F0DEEFEFDEEFEFDEEFEFDEEFEF0000DEEFEFE1F1F1
        CDDCDF3B84AE44B6FF4DBDFD45B4F73BA2E13FAFEF38A1DCFDAA24FFB92DFABB
        49EDA35EB374637A626F9099A4DDEFEFDFF0F0DEEFEFDEEFEFDEEFEF0000DEEF
        EFDFF0F0DBEAE847829E1D82BD4B9ACF4596C83891C30875BD438490FFC23BFF
        BC49FFBE43FFC13BFFBE3BFCAB53A4604CBDD3D6E1F2F2DEEFEFDEEFEFDEEFEF
        0000DEEFEFDEEFEFE3F3F1A0B8BE3289B88FCBF5B1DFF884C7F53494CCC3AB5F
        FFCD51FFC95FFFC959FFCA59FFC348FFC63AB46C4CC0D8DCE1F2F2DEEFEFDEEF
        EFDEEFEF0000DEEFEFDEEFEFDFF0F0E2F0EE9FB7C4548CAC6EA3C66399C0ABA4
        74FFCD4FFFD06BFFD46FFFD46EFFD167FFCE60FFC3579B6857D1E7EADFF1F1DE
        EFEFDEEFEFDEEFEF0000DEEFEFDEEFEFDEEFEFDEEFEFE7F6F4E7F4F2939DA1BB
        9798F5C26AFFD86AFFDC7FFFE28BFFDF87FFD77DFFD971FFC66A926C6CDDF3FA
        DEF0EFDEEFEFDEEFEFDEEFEF0000DEEFEFDEEFEFDEEFEFDEEFEFDFF0EFDFF2F4
        8A8F93D5B6AFF5CD6BFFE47CFFE693FFEF9CFFE692FFE38AFFE07DE0BC7A896A
        66F2FBF6EEF3EDEEF5F0EAF7F5E0F1F10000DEEFEFDEEFEFDEEFEFDEEFEFE2F3
        F3B3C4C7B7B4B0ABA1A0B09B91BEA596E0CEA9F9F8D2FEFECBFFFFB4B9DDB450
        C2EB5FCDFF5AD1FF4FCDFF40B0E2709AA7D7E5E30000DEEFEFDEEFEFDEEFEFDE
        EFEFE0F1F1CCE0E0ADB8B5ABABACA69FA4A1959CAE9198BC9997CCA395B1BDAA
        51CBF55CD2FF61CEFC61CDFA5ECDFA5ED5FF46BCEC93B3BB0000DEEFEFDEEFEF
        DEEFEFDEEFEFDEEFEFDFF0F0D9EBEBD0E3E3CDE1E0C5D3D3A5ADAD999193AF89
        856BA5C16ADEFF62D1FC55CBF556CBF655CAF660D4F662E1FF659FB60000DEEF
        EFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDFF0F0E0F1F1E1F2F2E4F7F6DF
        F3F8C6D6D66EAEC186F1FE5ED1F854D0F657D0F752CFF75DD3F56CE8FF6EAAB8
        0000DEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEF
        DEEFEFDEF0EFE6F4F4ACC5CB6DD5E887EFFF72DBF96BDCF66EDBF681EDFF60CD
        E4B3CDD20000}
      NumGlyphs = 1
      Align = alLeft
      Spacing = 3
      Layout = blGlyphTop
      OnClick = ToolButton3Click
    end
    object toolButton2: TspSkinButton
      Left = 90
      Top = 0
      Width = 90
      Height = 45
      Cursor = crHandPoint
      Hint = #36873#39033#35774#32622
      TabOrder = 3
      DrawDefault = True
      SkinData = spSkinData1
      SkinDataName = 'bigtoolbutton'
      AlphaBlend = False
      AlphaBlendValue = 200
      UseSkinCursor = False
      DefaultFont.Charset = GB2312_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = -12
      DefaultFont.Name = #23435#20307
      DefaultFont.Style = []
      UseSkinFont = True
      DefaultWidth = 0
      DefaultHeight = 0
      RepeatMode = False
      RepeatInterval = 100
      AllowAllUp = False
      ShowHint = True
      TabStop = True
      CanFocused = False
      Down = False
      GroupIndex = 0
      Caption = #36873#39033#35774#32622
      Glyph.Data = {
        36030000424D3603000000000000360000002800000010000000100000000100
        18000000000000030000120B0000120B00000000000000000000D8E9ECD8E9EC
        D8E9ECD8E9EC1E485F2B62894A89BD528BAE727B84CDD7DAD8E9ECD8E9ECD8E9
        ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECDBE9EC31698794C7F991C9F941
        85C92368AA65737ED8E9ECDAE9ECDAE8EBD8E9ECD8E9ECD8E9ECD8E9ECD8E9EC
        C1C7C97171714389AAE0F2FF549AD81A7ABE4998C53A80B9CFDDEA6868685050
        50ACB3B4D8E9ECD8E9ECD8E9ECD6DFE0BCBCBCDEDEDE718EA27AB6D590B7D155
        C9E45BDFF578D0ED4691D197A3ADD2D2D2808080C3CCCDD8E9ECD8E9ECD7DFE1
        A6A6A6D5D5D5C5C5C591B4C475B9D6C2F6FD63DFF75DE2F879D3F04796DAB9C3
        CD6F6F6FC7D0D1D8E9ECD8E9ECD8E9ECD6DEE0C5C5C5C1C1C1C5C5C58CB0C277
        CBE7C7F7FD5EDCF55AE1F77BD4F14796D9AFC1CCD8E9ECD8E9ECBCBFC0A2A4A4
        AAABABCFCFCFC6C6C6CCCCCCBBBFC0C3E0E779D3EEC7F7FD5FDCF55BE2F77AD6
        F24597D56D7C87888B8BC0C0C0E2E2E2D2D2D2C6C6C6CDCDCDB1B1B1DBE8E9D8
        E9ECD2EAEF7DD4EEC4F6FD6CDDF66DCAED63A3D7669FD2606972C4C4C4E9E9E9
        D6D6D6C9C9C9CECECEA5A5A5DAE6E8D8E9ECD8E9ECBDDFE87FD4ECB2E3F98BC0
        E7AED3F6C4E0FC669DD0D4D7D7CCCDCEC6C7C7D8D8D8CDCDCDBCBCBCABAEAFD9
        E5E8D9E6E8B2B6B78ABFCE77BEE7B4D2F0E5F3FFACD2EF508DC3D8E9ECD8E9EC
        DDE5E6D4D4D4CCCCCCC9C9C9BABABA9C9C9CA1A1A1C2C2C2C6C6C692BBCA58A5
        D885B1DB469DD0C9E3EDD8E9ECDFE7E8C4C4C4DCDCDCD4D4D4D9D9D9DBDBDBD6
        D6D6D4D4D4D9D9D9D2D2D2CBCBCBC8C8C87A7A7AC9D2D3D8E9ECD8E9ECE0E8EA
        DCDCDCEDEDEDDBDBDBC5C5C5BEBEBED6D6D6D4D4D4B0B0B0B0B0B0CBCBCBE7E7
        E7B7B7B7D0D9DAD8E9ECD8E9ECD8E9ECDFE5E7CECECECFCFCFD8E9ECC8C8C8DE
        DEDEDDDDDDB9B9B9D8E9ECB4B4B4A8A9A9CED4D6D8E9ECD8E9ECD8E9ECD8E9EC
        D8E9ECDDEBEEDAEAEDD8E9ECCCCECEE5E5E5E4E4E4B6B7B8D8E9ECDAEAEDDCEA
        EDD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECDFEAECD5
        D5D5D3D3D3DDE8EAD8E9ECD8E9ECD8E9ECD8E9ECD8E9ECD8E9EC}
      NumGlyphs = 1
      Align = alLeft
      Spacing = 3
      Layout = blGlyphTop
      OnClick = toolButton2Click
    end
    object toolButton1: TspSkinButton
      Left = 0
      Top = 0
      Width = 90
      Height = 45
      Cursor = crHandPoint
      Hint = #33258#21160#19978#32447
      TabOrder = 4
      DrawDefault = True
      SkinData = spSkinData1
      SkinDataName = 'bigtoolbutton'
      AlphaBlend = False
      AlphaBlendValue = 200
      UseSkinCursor = False
      DefaultFont.Charset = GB2312_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = -12
      DefaultFont.Name = #23435#20307
      DefaultFont.Style = []
      UseSkinFont = True
      DefaultWidth = 0
      DefaultHeight = 0
      RepeatMode = False
      RepeatInterval = 100
      AllowAllUp = False
      ShowHint = True
      TabStop = True
      CanFocused = False
      Down = False
      GroupIndex = 0
      Caption = #33258#21160#19978#32447
      Glyph.Data = {
        6E040000424D6E04000000000000360000002800000013000000120000000100
        1800000000003804000000000000000000000000000000000000DEEFEFDEEFEF
        DEEFEFE8F5ED8ABBFC2A6BFF3270FF3267FF2C5BFA294EF51D3DF62442F64E6B
        EEB3C8EFE8F9EFE2F3EFDEEFEFDEEFEFDEEFEF000000DEEFEFDEEFEFDEEFEFE9
        F5ED76B6FD0DA4FF10BCFF0CC1FF09B1FD0A9BFB1475F91240F3101EEC1628EE
        606EEED4E1EFE4F6EFDEEFEFDEEFEF000000DEEFEFDEEFEEDFF0EEE2F0EEC9EC
        EF2CFCFF00F7FF02EBFE03DFFE03DAFF02CCFE00BAFF0095FF0743F40005ED61
        6BEADDEAEEE4F6EFDEEFEF000000DEEFEEDBECF1D6E8F1E7F4EDECF6EEE5E8EC
        EDF5F1ECF0ECF4F1EDF2F2ECD8EBEF9FE2F83FCBFA08B9FF00B6FF004CF70000
        E4BAC7EDE4F5EF000000E1F1EEC7E1F45095FD648FF76C8DEFABBDEEC2D2EFE3
        F9EFDEEFEFDEEFEFE1EFEEE9F2EDECF2ED55C6FB00A4FF0099FF0026F25A55E7
        EDFFEF000000E1F1EECFE6F12D90FF1A64FC163EF60011EC0000E3AAB6EFE5F6
        EFDEEFEFDFF0EFDAEAEFE9F8EFEFF7EC1F9AFE009AFF008EFF5372EFEEFCEE00
        0000E1F1EED3E7F02D86F500ACFE06B8FC0695FA004EF5ADC4F2E5F4EEDEEFEF
        E7F9EF8587EAA1ABECEAF1EE237FF7009AFF008AFF54A7F9EEF7ED000000EAF7
        EE73A0F4075AF400B9FA00E2FF00DEFF00D6FFB3E9F4E4F0EEDEEFEFEBFAEF6C
        8BEE0000E4314CEA1177F8009CFF0086FF51ABF8EEF6ED000000EDF3ED5ECAF8
        00DFFF00DCFF00D0FF0CCDFF00C6FFC6EAF4E2EFEEDEEFEFE6F1ED6CE9FE007C
        F8055DF700A4FF009CFF0086FF72BEF7EAF4EE000000EEF1ED53DEF800CFFF2A
        D7FC9AE9F5B6E9F488E1F4D9EDF0DFEFEEDEEFEFE9F2ED4DCFFC00B6FF00ADFF
        00A6FF006FF963A4F8E1F1EFE0F0EE000000EEF1ED53DAF800C7FF23A9FBB4B6
        EDEDF6EEEEF7EEDFF0EEDEEFEFDEEFEFE0F0EEAEE5F34BCCFD26B8FC13B0FF00
        61F65B84F5E8F5EDDEEFEF000000EDF2ED59D3F800C1FF00B4FE001BEA736EEB
        C2D2EFEAFAEFE9F9EEE6F6EEE7F5EDEEF5ECF5FAEDEDF1ECDAEFF2B6E0F3BFDF
        F3DEF1EEDEEFEF000000E2EFEED3EEF40DBFFF00BCFF00AAFD0018ED1A1CEB40
        57EE6D87F2A5C0F5A0C1F8619FFD83A6E8E6F5F0E2F1EEE3F1EEE2F1EEDEEFEF
        DEEFEF000000DEEFEFE5F0EDDFF1F42BC0FD00B5FF00A3FC0042F30828EF092F
        F30C3CF61D5AFB337AFF0032DF6A8DE4E5F5EFDEEFEFDEEFEFDEEFEFDEEFEF00
        0000DEEFEFDEEFEFE7F1EDBAE5F03DBFFA00A4FF00A4FF0094FD007AFD0679FC
        0D85FD099CFF0080F40035DFD6E3EEE0F1EFDEEFEFDEEFEFDEEFEF000000DEEF
        EFDEEFEFDEEFEFE3F0EEE1F0EED8EDEFD8EAEE9CDBF767CAFA23B2FE17AAFE1D
        B1FD45BAFF93D1F9E1F0EFDEEFEEDEEFEFDEEFEFDEEFEF000000DEEFEFDEEFEF
        DEEFEFDEEFEFDFEFEEE1F0EEE1F0EEE7F2EEECF4EDF2F6EDF4F6EDF3F6EDEFF5
        EDE7F3EEDEEFEEDEEFEFDEEFEFDEEFEFDEEFEF000000DEEFEFDEEFEFDEEFEFDE
        EFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEFDEEFEF
        DEEFEFDEEFEFDEEFEFDEEFEFDEEFEF000000}
      NumGlyphs = 1
      Align = alLeft
      Spacing = 3
      Layout = blGlyphTop
      OnClick = toolButton1Click
    end
  end
  object Memo1: TspSkinMemo
    Left = 0
    Top = 429
    Width = 729
    Height = 53
    Align = alBottom
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = 14
    Font.Name = 'Arial'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    DefaultFont.Charset = DEFAULT_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = 14
    DefaultFont.Name = 'Arial'
    DefaultFont.Style = []
    UseSkinFont = True
    BitMapBG = False
    SkinDataName = 'memo'
    Transparent = False
    AlphaBlendValue = 0
  end
  object exp: TspSkinExPanel
    Left = 0
    Top = 338
    Width = 729
    Height = 91
    TabOrder = 3
    DrawDefault = True
    SkinData = spSkinData1
    SkinDataName = 'expanel'
    AlphaBlend = False
    AlphaBlendValue = 200
    UseSkinCursor = False
    DefaultFont.Charset = DEFAULT_CHARSET
    DefaultFont.Color = clWindowText
    DefaultFont.Height = 14
    DefaultFont.Name = 'Arial'
    DefaultFont.Style = []
    UseSkinFont = True
    DefaultWidth = 0
    DefaultHeight = 0
    NumGlyphs = 1
    Spacing = 2
    RealWidth = 0
    RealHeight = 0
    ShowRollButton = True
    ShowCloseButton = False
    DefaultCaptionHeight = 21
    RollState = False
    RollKind = rkRollVertical
    Align = alBottom
    Caption = #24191#25773#21629#20196
    OnChangeRollState = expChangeRollState
    object spSkinPanel3: TspSkinPanel
      Left = 1
      Top = 21
      Width = 727
      Height = 69
      TabOrder = 0
      DrawDefault = True
      SkinData = spSkinData1
      SkinDataName = 'panel'
      AlphaBlend = False
      AlphaBlendValue = 200
      UseSkinCursor = False
      DefaultFont.Charset = DEFAULT_CHARSET
      DefaultFont.Color = clWindowText
      DefaultFont.Height = 14
      DefaultFont.Name = 'Arial'
      DefaultFont.Style = []
      UseSkinFont = True
      DefaultWidth = 0
      DefaultHeight = 0
      RealHeight = -1
      AutoEnabledControls = True
      CheckedMode = False
      Checked = False
      NumGlyphs = 1
      Spacing = 2
      DefaultAlignment = taLeftJustify
      DefaultCaptionHeight = 22
      BorderStyle = bvNone
      CaptionMode = False
      RollUpMode = False
      RollUpState = False
      Caption = 'spSkinPanel3'
      Align = alClient
      object Label23: TspSkinStdLabel
        Left = 15
        Top = 12
        Width = 60
        Height = 12
        UseSkinFont = True
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = -12
        DefaultFont.Name = #23435#20307
        DefaultFont.Style = []
        SkinData = spSkinData1
        SkinDataName = 'stdlabel'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Caption = #25171#24320#32593#39029#65306
        ParentFont = False
      end
      object Label24: TspSkinStdLabel
        Left = 15
        Top = 38
        Width = 60
        Height = 12
        UseSkinFont = True
        DefaultFont.Charset = DEFAULT_CHARSET
        DefaultFont.Color = clWindowText
        DefaultFont.Height = -12
        DefaultFont.Name = #23435#20307
        DefaultFont.Style = []
        SkinData = spSkinData1
        SkinDataName = 'stdlabel'
        Font.Charset = DEFAULT_CHARSET