showpic.dfm

灰鸽子VIP1.2经典源代码

object ShowPm: TShowPm
  Left = 223
  Top = 169
  AutoScroll = False
  BorderIcons = []
  Caption = #25429#33719#23631#24149
  ClientHeight = 445
  ClientWidth = 668
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnKeyDown = FormKeyDown
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object spSkinSpeedButton2: TspSkinSpeedButton
    Left = 236
    Top = 232
    Width = 145
    Height = 65
    DrawDefault = True
    SkinDataName = 'button'
    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
    ImageIndex = 0
    RepeatMode = False
    RepeatInterval = 100
    Flat = False
    AllowAllUp = False
    Down = False
    GroupIndex = 0
    NumGlyphs = 1
    Spacing = 1
  end
  object Panelbox: TspSkinPanel
    Left = 0
    Top = 38
    Width = 668
    Height = 407
    TabOrder = 0
    DrawDefault = True
    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
    AutoEnabledControls = True
    CheckedMode = False
    Checked = False
    NumGlyphs = 1
    Spacing = 2
    DefaultAlignment = taLeftJustify
    DefaultCaptionHeight = 22
    BorderStyle = bvNone
    CaptionMode = False
    RollUpMode = False
    RollUpState = False
    Align = alClient
    ParentShowHint = False
    ShowHint = False
    object ScrollBox1: TScrollBox
      Left = 0
      Top = 0
      Width = 668
      Height = 407
      Align = alClient
      Color = clGray
      ParentColor = False
      TabOrder = 0
      object Image1: TPaintBox
        Left = 0
        Top = 0
        Width = 121
        Height = 97
        OnClick = PaintBox1Click
        OnDblClick = PaintBox1DblClick
        OnMouseDown = PaintBox1MouseDown
        OnMouseMove = PaintBox1MouseMove
        OnMouseUp = PaintBox1MouseUp
        OnPaint = Image1Paint
      end
    end
  end
  object ControlBar1: TspSkinControlBar
    Left = 0
    Top = 0
    Width = 668
    Height = 38
    SkinDataName = 'controlbar'
    SkinData = HgzVip.spSkinData1
    SkinBevel = False
    Align = alTop
    AutoDrag = False
    AutoSize = True
    BevelInner = bvNone
    RowSnap = False
    TabOrder = 1
    object MainPanel: TspSkinPanel
      Left = 11
      Top = 2
      Width = 651
      Height = 32
      TabOrder = 0
      DrawDefault = True
      SkinData = HgzVip.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
      AutoEnabledControls = True
      CheckedMode = False
      Checked = False
      NumGlyphs = 1
      Spacing = 2
      DefaultAlignment = taLeftJustify
      DefaultCaptionHeight = 22
      BorderStyle = bvNone
      CaptionMode = False
      RollUpMode = False
      RollUpState = False
      object StatButton: TspSkinSpeedButton
        Left = 34
        Top = 4
        Width = 28
        Height = 24
        Hint = #24320#22987#25429#33719#23631#24149
        DrawDefault = True
        SkinData = HgzVip.spSkinData1
        SkinDataName = 'resizebutton'
        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
        ImageIndex = 0
        RepeatMode = False
        RepeatInterval = 100
        Flat = False
        AllowAllUp = False
        ShowHint = True
        Down = False
        GroupIndex = 1
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
          00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
          70E337F3333F333337F3E0F33303333370E337F3337FF33337F3E0F333003333
          70E337F33377FF3337F3E0F33300033370E337F333777FF337F3E0F333000033
          70E337F33377773337F3E0F33300033370E337F33377733337F3E0F333003333
          70E337F33377333337F3E0F33303333370E337F33373333337F3E0F333333333
          70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
          00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
        NumGlyphs = 2
        Spacing = 1
        OnClick = StatButtonClick
      end
      object StopButton: TspSkinSpeedButton
        Left = 2
        Top = 4
        Width = 28
        Height = 24
        Hint = #20572#27490#25429#33719
        DrawDefault = True
        SkinData = HgzVip.spSkinData1
        SkinDataName = 'resizebutton'
        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
        ImageIndex = 0
        RepeatMode = False
        RepeatInterval = 100
        Flat = False
        AllowAllUp = False
        ShowHint = True
        Down = True
        GroupIndex = 1
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
          00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
          70E337F33333333337F3E0F33333333370E337F333FF3FF337F3E0F330030033
          70E337F3377F77F337F3E0F33003003370E337F3377F77F337F3E0F330030033
          70E337F3377F77F337F3E0F33003003370E337F3377F77F337F3E0F330030033
          70E337F33773773337F3E0F33333333370E337F33333333337F3E0F333333333
          70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
          00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
        NumGlyphs = 2
        Spacing = 1
        OnClick = StopButtonClick
      end
      object jianpanButton: TspSkinSpeedButton
        Left = 66
        Top = 4
        Width = 28
        Height = 24
        Hint = #20256#36865#38190#30424#25805#20316
        DrawDefault = True
        SkinData = HgzVip.spSkinData1
        SkinDataName = 'resizebutton'
        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
        ImageIndex = 0
        RepeatMode = False
        RepeatInterval = 100
        Flat = False
        AllowAllUp = True
        ShowHint = True
        Down = False
        GroupIndex = 2
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333033333
          333333333373F3333333333330F033333333333337373F33333333330FFF0333
          33333333733F73F333333330F80FF033333333373373373F3333330F80F7FF03
          33333373373F3F73F33330F70F0F0FF03333373F737373F73F33330F77F7F0FF
          03333373F33F373F73F33330F70F0F0FF03333373F737373373F33330F77F7F7
          FF03333373F33F3F3F73333330F70F0F07F03333373F737373373333330F77FF
          7F0333333373F33F337333333330F707F033333333373F733733333333330F7F
          03333333333373F373F33333333330F0303333F3F3F3F73737F3303030303303
          3033373737373F7FF73303030303000003337373737377777333}
        NumGlyphs = 2
        Spacing = 1
      end
      object ShubiaoButton: TspSkinSpeedButton
        Left = 98
        Top = 4
        Width = 28
        Height = 24
        Hint = #20256#36865#40736#26631#25805#20316
        DrawDefault = True
        SkinData = HgzVip.spSkinData1
        SkinDataName = 'resizebutton'
        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
        ImageIndex = 0
        RepeatMode = False
        RepeatInterval = 100
        Flat = False
        AllowAllUp = True
        ShowHint = True
        Down = False
        GroupIndex = 3
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
          3333333337773F333333333330FFF03333333333733373F3333333330FFFFF03
          33333337F33337F3333333330FFFFF0333333337F33337F3333333330FFFFF03
          33333337FFFFF7F3333333330777770333333337777777F3333333330FF7FF03
          33333337F37F37F3333333330FF7FF03333333373F7FF7333333333330000033
          33333333777773FFF33333333330330007333333337F37777F33333333303033
          307333333373733377F33333333303333303333333F7F33337F3333333330733
          330333333F777F3337F333333370307330733333F77377FF7733333337033300
          0733333F77333777733333337033333333333337733333333333}
        NumGlyphs = 2
        Spacing = 1
      end
      object WinButton: TspSkinSpeedButton
        Left = 361
        Top = 4
        Width = 28
        Height = 24
        Hint = #24377#20986#24320#22987#33756#21333
        DrawDefault = True
        SkinData = HgzVip.spSkinData1
        SkinDataName = 'resizebutton'
        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
        ImageIndex = 0
        RepeatMode = False
        RepeatInterval = 100
        Flat = False
        AllowAllUp = False
        ShowHint = True
        Down = False
        GroupIndex = 0
        Glyph.Data = {
          36030000424D3603000000000000360000002800000010000000100000000100
          18000000000000030000120B0000120B00000000000000000000CED3D6CED3D6
          CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3
          D6CED3D6CED3D6CED3D6CED3D6CED3D6000000000000000000000000000000CE
          D3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6CED3D6000000000000CED3D6
          000000CED3D6000000000000000000000000000000CED3D6CED3D6CED3D6CED3
          D6000000000000000000000000CED3D6CED3D6CED3D6CED3D6CED3D600000000
          0000000000000000000000000000000000000000000000000000CED3D6CED3D6
          FF0000FF0000FF0000FF0000000000000000FF00000000000000000000000000
          0000FFFF000000000000FF0000CED3D6FF0000CED3D6FF0000FF000000000000
          0000FF0000FF000000000000000000FFFF00FFFF000000000000FF0000CED3D6
          CED3D6CED3D6CED3D6CED3D6000000000000FF0000FF000000000000000000FF
          FF00FFFF000000000000CED3D6CED3D60000FF0000FF0000FF0000FF00000000
          0000000000FF000000000000000000FFFF0000000000000000000000FFCED3D6
          0000FFCED3D60000FF0000FF0000000000000000000000000000000000000000
          000000000000000000000000FFCED3D6CED3D6CED3D6CED3D6CED3D600000000