TscGPButton UI样式代码-蓝色分组按钮


分组按钮效果如下图:



 


复制如下代码到Delphi IDE的窗体上粘贴即可看到按钮 (学习大师原创代码,请勿转载




代码如下:



object scGPButton3: TscGPButton

    Left = 40

    Top = 88

    Width = 100

    Height = 35

    Font.Charset = ANSI_CHARSET

    Font.Color = clWindowText

    Font.Height = -13

    Font.Name = #24494#36719#38597#40657

    Font.Style = []

    Font.Quality = fqClearTypeNatural

    ParentFont = False

    TabOrder = 2

    Animation = False

    Caption = #24038#36793#25353#38062

    CanFocused = False

    CustomDropDown = False

    Margin = -1

    Spacing = 1

    Layout = blGlyphLeft

    ImageIndex = -1

    ImageMargin = 0

    TransparentBackground = True

    Options.NormalColor = 15132390

    Options.HotColor = 13092807

    Options.PressedColor = 14587994

    Options.FocusedColor = 13092807

    Options.DisabledColor = 16053492

    Options.NormalColor2 = clNone

    Options.HotColor2 = clNone

    Options.PressedColor2 = clNone

    Options.FocusedColor2 = clNone

    Options.DisabledColor2 = clNone

    Options.NormalColorAlpha = 255

    Options.HotColorAlpha = 255

    Options.PressedColorAlpha = 255

    Options.FocusedColorAlpha = 255

    Options.DisabledColorAlpha = 255

    Options.NormalColor2Alpha = 255

    Options.HotColor2Alpha = 255

    Options.PressedColor2Alpha = 255

    Options.FocusedColor2Alpha = 255

    Options.DisabledColor2Alpha = 255

    Options.FrameNormalColor = 15132390

    Options.FrameHotColor = 13092807

    Options.FramePressedColor = 14587994

    Options.FrameFocusedColor = 13092807

    Options.FrameDisabledColor = 16053492

    Options.FrameWidth = 1

    Options.FrameNormalColorAlpha = 255

    Options.FrameHotColorAlpha = 255

    Options.FramePressedColorAlpha = 255

    Options.FrameFocusedColorAlpha = 255

    Options.FrameDisabledColorAlpha = 255

    Options.FontNormalColor = 3355443

    Options.FontHotColor = 4473924

    Options.FontPressedColor = clWhite

    Options.FontFocusedColor = 4473924

    Options.FontDisabledColor = 11250603

    Options.ShapeFillGradientAngle = 90

    Options.ShapeFillGradientPressedAngle = -90

    Options.ShapeFillGradientColorOffset = 25

    Options.ShapeCornerRadius = 2

    Options.ShapeStyle = scgpSegmentedLeft

    Options.ArrowSize = 9

    Options.ArrowAreaSize = 0

    Options.ArrowType = scgpatDefault

    Options.ArrowThickness = 2

    Options.ArrowThicknessScaled = False

    Options.StyleColors = True

    HotImageIndex = -1

    FocusedImageIndex = -1

    PressedImageIndex = -1

    UseGalleryMenuImage = False

    UseGalleryMenuCaption = False

    ScaleMarginAndSpacing = False

    WidthWithCaption = 0

    WidthWithoutCaption = 0

    SplitButton = False

    RepeatClick = False

    RepeatClickInterval = 100

    GlowEffect.Enabled = False

    GlowEffect.Color = clHighlight

    GlowEffect.AlphaValue = 255

    GlowEffect.GlowSize = 7

    GlowEffect.Offset = 0

    GlowEffect.Intensive = True

    GlowEffect.StyleColors = True

    GlowEffect.HotColor = clNone

    GlowEffect.PressedColor = clNone

    GlowEffect.FocusedColor = clNone

    GlowEffect.PressedGlowSize = 7

    GlowEffect.PressedAlphaValue = 255

    GlowEffect.States = [scsHot, scsPressed, scsFocused]

    ImageGlow = True

    ShowGalleryMenuFromTop = False

    ShowGalleryMenuFromRight = False

    ShowMenuArrow = True

    ShowFocusRect = True

    Down = True

    GroupIndex = 1

    AllowAllUp = False

  end

  object scGPButton1: TscGPButton

    Left = 140

    Top = 88

    Width = 100

    Height = 35

    Font.Charset = ANSI_CHARSET

    Font.Color = clWindowText

    Font.Height = -13

    Font.Name = #24494#36719#38597#40657

    Font.Style = []

    Font.Quality = fqClearTypeNatural

    ParentFont = False

    TabOrder = 0

    Animation = False

    Caption = #20013#38388#25353#38062

    CanFocused = False

    CustomDropDown = False

    Margin = -1

    Spacing = 1

    Layout = blGlyphLeft

    ImageIndex = -1

    ImageMargin = 0

    TransparentBackground = True

    Options.NormalColor = 15132390

    Options.HotColor = 13092807

    Options.PressedColor = 14587994

    Options.FocusedColor = 13092807

    Options.DisabledColor = 16053492

    Options.NormalColor2 = clNone

    Options.HotColor2 = clNone

    Options.PressedColor2 = clNone

    Options.FocusedColor2 = clNone

    Options.DisabledColor2 = clNone

    Options.NormalColorAlpha = 255

    Options.HotColorAlpha = 255

    Options.PressedColorAlpha = 255

    Options.FocusedColorAlpha = 255

    Options.DisabledColorAlpha = 255

    Options.NormalColor2Alpha = 255

    Options.HotColor2Alpha = 255

    Options.PressedColor2Alpha = 255

    Options.FocusedColor2Alpha = 255

    Options.DisabledColor2Alpha = 255

    Options.FrameNormalColor = 15132390

    Options.FrameHotColor = 13092807

    Options.FramePressedColor = 14587994

    Options.FrameFocusedColor = 13092807

    Options.FrameDisabledColor = 16053492

    Options.FrameWidth = 1

    Options.FrameNormalColorAlpha = 255

    Options.FrameHotColorAlpha = 255

    Options.FramePressedColorAlpha = 255

    Options.FrameFocusedColorAlpha = 255

    Options.FrameDisabledColorAlpha = 255

    Options.FontNormalColor = 3355443

    Options.FontHotColor = 4473924

    Options.FontPressedColor = clWhite

    Options.FontFocusedColor = 4473924

    Options.FontDisabledColor = 11250603

    Options.ShapeFillGradientAngle = 90

    Options.ShapeFillGradientPressedAngle = -90

    Options.ShapeFillGradientColorOffset = 25

    Options.ShapeCornerRadius = 2

    Options.ShapeStyle = scgpSegmentedMiddle

    Options.ArrowSize = 9

    Options.ArrowAreaSize = 0

    Options.ArrowType = scgpatDefault

    Options.ArrowThickness = 2

    Options.ArrowThicknessScaled = False

    Options.StyleColors = True

    HotImageIndex = -1

    FocusedImageIndex = -1

    PressedImageIndex = -1

    UseGalleryMenuImage = False

    UseGalleryMenuCaption = False

    ScaleMarginAndSpacing = False

    WidthWithCaption = 0

    WidthWithoutCaption = 0

    SplitButton = False

    RepeatClick = False

    RepeatClickInterval = 100

    GlowEffect.Enabled = False

    GlowEffect.Color = clHighlight

    GlowEffect.AlphaValue = 255

    GlowEffect.GlowSize = 7

    GlowEffect.Offset = 0

    GlowEffect.Intensive = True

    GlowEffect.StyleColors = True

    GlowEffect.HotColor = clNone

    GlowEffect.PressedColor = clNone

    GlowEffect.FocusedColor = clNone

    GlowEffect.PressedGlowSize = 7

    GlowEffect.PressedAlphaValue = 255

    GlowEffect.States = [scsHot, scsPressed, scsFocused]

    ImageGlow = True

    ShowGalleryMenuFromTop = False

    ShowGalleryMenuFromRight = False

    ShowMenuArrow = True

    ShowFocusRect = True

    Down = False

    GroupIndex = 1

    AllowAllUp = False

  end

  object scGPButton2: TscGPButton

    Left = 240

    Top = 88

    Width = 100

    Height = 35

    Font.Charset = ANSI_CHARSET

    Font.Color = clWindowText

    Font.Height = -13

    Font.Name = #24494#36719#38597#40657

    Font.Style = []

    Font.Quality = fqClearTypeNatural

    ParentFont = False

    TabOrder = 1

    Animation = False

    Caption = #20013#38388#25353#38062

    CanFocused = False

    CustomDropDown = False

    Margin = -1

    Spacing = 1

    Layout = blGlyphLeft

    ImageIndex = -1

    ImageMargin = 0

    TransparentBackground = True

    Options.NormalColor = 15132390

    Options.HotColor = 13092807

    Options.PressedColor = 14587994

    Options.FocusedColor = 13092807

    Options.DisabledColor = 16053492

    Options.NormalColor2 = clNone

    Options.HotColor2 = clNone

    Options.PressedColor2 = clNone

    Options.FocusedColor2 = clNone

    Options.DisabledColor2 = clNone

    Options.NormalColorAlpha = 255

    Options.HotColorAlpha = 255

    Options.PressedColorAlpha = 255

    Options.FocusedColorAlpha = 255

    Options.DisabledColorAlpha = 255

    Options.NormalColor2Alpha = 255

    Options.HotColor2Alpha = 255

    Options.PressedColor2Alpha = 255

    Options.FocusedColor2Alpha = 255

    Options.DisabledColor2Alpha = 255

    Options.FrameNormalColor = 15132390

    Options.FrameHotColor = 13092807

    Options.FramePressedColor = 14587994

    Options.FrameFocusedColor = 13092807

    Options.FrameDisabledColor = 16053492

    Options.FrameWidth = 1

    Options.FrameNormalColorAlpha = 255

    Options.FrameHotColorAlpha = 255

    Options.FramePressedColorAlpha = 255

    Options.FrameFocusedColorAlpha = 255

    Options.FrameDisabledColorAlpha = 255

    Options.FontNormalColor = 3355443

    Options.FontHotColor = 4473924

    Options.FontPressedColor = clWhite

    Options.FontFocusedColor = 4473924

    Options.FontDisabledColor = 11250603

    Options.ShapeFillGradientAngle = 90

    Options.ShapeFillGradientPressedAngle = -90

    Options.ShapeFillGradientColorOffset = 25

    Options.ShapeCornerRadius = 2

    Options.ShapeStyle = scgpSegmentedMiddle

    Options.ArrowSize = 9

    Options.ArrowAreaSize = 0

    Options.ArrowType = scgpatDefault

    Options.ArrowThickness = 2

    Options.ArrowThicknessScaled = False

    Options.StyleColors = True

    HotImageIndex = -1

    FocusedImageIndex = -1

    PressedImageIndex = -1

    UseGalleryMenuImage = False

    UseGalleryMenuCaption = False

    ScaleMarginAndSpacing = False

    WidthWithCaption = 0

    WidthWithoutCaption = 0

    SplitButton = False

    RepeatClick = False

    RepeatClickInterval = 100

    GlowEffect.Enabled = False

    GlowEffect.Color = clHighlight

    GlowEffect.AlphaValue = 255

    GlowEffect.GlowSize = 7

    GlowEffect.Offset = 0

    GlowEffect.Intensive = True

    GlowEffect.StyleColors = True

    GlowEffect.HotColor = clNone

    GlowEffect.PressedColor = clNone

    GlowEffect.FocusedColor = clNone

    GlowEffect.PressedGlowSize = 7

    GlowEffect.PressedAlphaValue = 255

    GlowEffect.States = [scsHot, scsPressed, scsFocused]

    ImageGlow = True

    ShowGalleryMenuFromTop = False

    ShowGalleryMenuFromRight = False

    ShowMenuArrow = True

    ShowFocusRect = True

    Down = False

    GroupIndex = 1

    AllowAllUp = False

  end

  object scGPButton4: TscGPButton

    Left = 340

    Top = 88

    Width = 100

    Height = 35

    Font.Charset = ANSI_CHARSET

    Font.Color = clWindowText

    Font.Height = -13

    Font.Name = #24494#36719#38597#40657

    Font.Style = []

    Font.Quality = fqClearTypeNatural

    ParentFont = False

    TabOrder = 3

    Animation = False

    Caption = #21491#36793#25353#38062

    CanFocused = False

    CustomDropDown = False

    Margin = -1

    Spacing = 1

    Layout = blGlyphLeft

    ImageIndex = -1

    ImageMargin = 0

    TransparentBackground = True

    Options.NormalColor = 15132390

    Options.HotColor = 13092807

    Options.PressedColor = 14587994

    Options.FocusedColor = 13092807

    Options.DisabledColor = 16053492

    Options.NormalColor2 = clNone

    Options.HotColor2 = clNone

    Options.PressedColor2 = clNone

    Options.FocusedColor2 = clNone

    Options.DisabledColor2 = clNone

    Options.NormalColorAlpha = 255

    Options.HotColorAlpha = 255

    Options.PressedColorAlpha = 255

    Options.FocusedColorAlpha = 255

    Options.DisabledColorAlpha = 255

    Options.NormalColor2Alpha = 255

    Options.HotColor2Alpha = 255

    Options.PressedColor2Alpha = 255

    Options.FocusedColor2Alpha = 255

    Options.DisabledColor2Alpha = 255

    Options.FrameNormalColor = 15132390

    Options.FrameHotColor = 13092807

    Options.FramePressedColor = 14587994

    Options.FrameFocusedColor = 13092807

    Options.FrameDisabledColor = 16053492

    Options.FrameWidth = 1

    Options.FrameNormalColorAlpha = 255

    Options.FrameHotColorAlpha = 255

    Options.FramePressedColorAlpha = 255

    Options.FrameFocusedColorAlpha = 255

    Options.FrameDisabledColorAlpha = 255

    Options.FontNormalColor = 3355443

    Options.FontHotColor = 4473924

    Options.FontPressedColor = clWhite

    Options.FontFocusedColor = 4473924

    Options.FontDisabledColor = 11250603

    Options.ShapeFillGradientAngle = 90

    Options.ShapeFillGradientPressedAngle = -90

    Options.ShapeFillGradientColorOffset = 25

    Options.ShapeCornerRadius = 2

    Options.ShapeStyle = scgpSegmentedRight

    Options.ArrowSize = 9

    Options.ArrowAreaSize = 0

    Options.ArrowType = scgpatDefault

    Options.ArrowThickness = 2

    Options.ArrowThicknessScaled = False

    Options.StyleColors = True

    HotImageIndex = -1

    FocusedImageIndex = -1

    PressedImageIndex = -1

    UseGalleryMenuImage = False

    UseGalleryMenuCaption = False

    ScaleMarginAndSpacing = False

    WidthWithCaption = 0

    WidthWithoutCaption = 0

    SplitButton = False

    RepeatClick = False

    RepeatClickInterval = 100

    GlowEffect.Enabled = False

    GlowEffect.Color = clHighlight

    GlowEffect.AlphaValue = 255

    GlowEffect.GlowSize = 7

    GlowEffect.Offset = 0

    GlowEffect.Intensive = True

    GlowEffect.StyleColors = True

    GlowEffect.HotColor = clNone

    GlowEffect.PressedColor = clNone

    GlowEffect.FocusedColor = clNone

    GlowEffect.PressedGlowSize = 7

    GlowEffect.PressedAlphaValue = 255

    GlowEffect.States = [scsHot, scsPressed, scsFocused]

    ImageGlow = True

    ShowGalleryMenuFromTop = False

    ShowGalleryMenuFromRight = False

    ShowMenuArrow = True

    ShowFocusRect = True

    Down = False

    GroupIndex = 1

    AllowAllUp = False

  end

















联系电话:
020-00000000
联系电话:
020-00000000
联系电话:
020-12345678