Style Control TscGPPageControl 样式

最新推荐文章于 2023-06-14 07:01:20 发布
最新推荐文章于 2023-06-14 07:01:20 发布
阅读量593 收藏
点赞数
分类专栏： delphi
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/hsqchdn/article/details/118667593
版权 
--pas--
unit Unit2;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, scGPControls, Vcl.ExtCtrls,
  Vcl.StdCtrls, scExtControls, scGPPagers, scControls;

type
  TForm1 = class(TForm)
    scGPPageControl1: TscGPPageControl;
    scGPPageControlPage1: TscGPPageControlPage;
    scGPPageControlPage2: TscGPPageControlPage;
    scGPPageControlPage3: TscGPPageControlPage;
    Button1: TButton;
    Panel1: TPanel;
    scGPPanel1: TscGPPanel;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

end.


---------dfm-------------
object Form1: TForm1
  Left = 0
  Top = 0
  Caption = 'QQ16643506'#21046#20316#65292#20851#27880'QQ'#32676#65306'682628230'
  ClientHeight = 355
  ClientWidth = 612
  Color = clWhite
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object scGPPageControl1: TscGPPageControl
    Left = 24
    Top = 40
    Width = 529
    Height = 257
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = #24494#36719#38597#40657
    Font.Style = []
    ParentFont = False
    FluentUIOpaque = False
    TabOrder = 0
    Color = clWhite
    DrawTextMode = scdtmGDI
    TabsBGFillColor = clNone
    TabsBGFillColorAlpha = 255
    TransparentBackground = False
    FrameWidth = 1
    FrameScaleWidth = False
    FrameColor = 14540253
    FrameColorAlpha = 255
    BorderStyle = scgpbsLineTopBottom
    MouseWheelSupport = True
    ShowFocusRect = True
    ShowInActiveTab = False
    ShowCloseButtons = True
    ShowCloseButtonOnActiveTabOnly = False
    TabsLeftOffset = 0
    TabsRightOffset = 15
    TabsTopOffset = 0
    TabGlowEffect.Enabled = False
    TabGlowEffect.Color = clHighlight
    TabGlowEffect.AlphaValue = 255
    TabGlowEffect.GlowSize = 7
    TabGlowEffect.Offset = 0
    TabGlowEffect.Intensive = True
    TabGlowEffect.StyleColors = True
    TabGlowEffect.HotColor = clNone
    TabGlowEffect.PressedColor = clNone
    TabGlowEffect.FocusedColor = clNone
    TabGlowEffect.PressedGlowSize = 7
    TabGlowEffect.PressedAlphaValue = 255
    TabGlowEffect.States = [scsFocused]
    TabOptions.NormalColor = clWhite
    TabOptions.ActiveColor = clWhite
    TabOptions.MouseInColor = clBtnShadow
    TabOptions.FocusedColor = clWhite
    TabOptions.NormalColorAlpha = 70
    TabOptions.ActiveColorAlpha = 230
    TabOptions.MouseInColorAlpha = 40
    TabOptions.FocusedColorAlpha = 255
    TabOptions.FrameNormalColor = 14540253
    TabOptions.FrameActiveColor = 14540253
    TabOptions.FrameMouseInColor = 14540253
    TabOptions.FrameFocusedColor = 14540253
    TabOptions.FrameWidth = 1
    TabOptions.FrameNormalColorAlpha = 50
    TabOptions.FrameActiveColorAlpha = 255
    TabOptions.FrameMouseInColorAlpha = 255
    TabOptions.FrameFocusedColorAlpha = 255
    TabOptions.FontNormalColor = 14130474
    TabOptions.FontActiveColor = clBtnText
    TabOptions.FontMouseInColor = clBtnText
    TabOptions.FontFocusedColor = clBtnText
    TabOptions.TabStyle = gptsShape
    TabOptions.ShapeFillGradientAngle = 90
    TabOptions.GradientColorOffset = 30
    TabOptions.ShapeCornerRadius = 0
    TabOptions.StyleColors = True
    TabSpacing = 10
    TabMargin = 10
    TabWidth = 0
    ScrollButtonWidth = 20
    TabHeight = 35
    Tabs = <
      item
        Page = scGPPageControlPage1
        Visible = True
        Enabled = True
        ImageIndex = -1
        Caption = '  '#27969#28010'  '
        CustomOptions.NormalColor = clBtnShadow
        CustomOptions.ActiveColor = clBtnFace
        CustomOptions.MouseInColor = clBtnShadow
        CustomOptions.FocusedColor = clBtnFace
        CustomOptions.NormalColorAlpha = 70
        CustomOptions.ActiveColorAlpha = 230
        CustomOptions.MouseInColorAlpha = 40
        CustomOptions.FocusedColorAlpha = 255
        CustomOptions.FrameNormalColor = clBtnText
        CustomOptions.FrameActiveColor = clBtnText
        CustomOptions.FrameMouseInColor = clBtnText
        CustomOptions.FrameFocusedColor = clBtnText
        CustomOptions.FrameWidth = 2
        CustomOptions.FrameNormalColorAlpha = 50
        CustomOptions.FrameActiveColorAlpha = 80
        CustomOptions.FrameMouseInColorAlpha = 60
        CustomOptions.FrameFocusedColorAlpha = 80
        CustomOptions.FontNormalColor = clBtnText
        CustomOptions.FontActiveColor = clBtnText
        CustomOptions.FontMouseInColor = clBtnText
        CustomOptions.FontFocusedColor = clBtnText
        CustomOptions.TabStyle = gptsShape
        CustomOptions.ShapeFillGradientAngle = 90
        CustomOptions.GradientColorOffset = 30
        CustomOptions.ShapeCornerRadius = 5
        CustomOptions.StyleColors = True
        CustomGlowEffect.Enabled = False
        CustomGlowEffect.Color = clHighlight
        CustomGlowEffect.AlphaValue = 255
        CustomGlowEffect.GlowSize = 7
        CustomGlowEffect.Offset = 0
        CustomGlowEffect.Intensive = True
        CustomGlowEffect.StyleColors = True
        CustomGlowEffect.HotColor = clNone
        CustomGlowEffect.PressedColor = clNone
        CustomGlowEffect.FocusedColor = clNone
        CustomGlowEffect.PressedGlowSize = 7
        CustomGlowEffect.PressedAlphaValue = 255
        CustomGlowEffect.States = [scsFocused]
        CustomFrameColor = clNone
        CustomFrameColorAlpha = 255
        ShowCloseButton = True
        UseCustomOptions = False
      end
      item
        Page = scGPPageControlPage2
        Visible = True
        Enabled = True
        ImageIndex = -1
        Caption = '  '#27969#28010'  '
        CustomOptions.NormalColor = clBtnShadow
        CustomOptions.ActiveColor = clBtnFace
        CustomOptions.MouseInColor = clBtnShadow
        CustomOptions.FocusedColor = clBtnFace
        CustomOptions.NormalColorAlpha = 70
        CustomOptions.ActiveColorAlpha = 230
        CustomOptions.MouseInColorAlpha = 40
        CustomOptions.FocusedColorAlpha = 255
        CustomOptions.FrameNormalColor = clBtnText
        CustomOptions.FrameActiveColor = clBtnText
        CustomOptions.FrameMouseInColor = clBtnText
        CustomOptions.FrameFocusedColor = clBtnText
        CustomOptions.FrameWidth = 2
        CustomOptions.FrameNormalColorAlpha = 50
        CustomOptions.FrameActiveColorAlpha = 80
        CustomOptions.FrameMouseInColorAlpha = 60
        CustomOptions.FrameFocusedColorAlpha = 80
        CustomOptions.FontNormalColor = clBtnText
        CustomOptions.FontActiveColor = clBtnText
        CustomOptions.FontMouseInColor = clBtnText
        CustomOptions.FontFocusedColor = clBtnText
        CustomOptions.TabStyle = gptsShape
        CustomOptions.ShapeFillGradientAngle = 90
        CustomOptions.GradientColorOffset = 30
        CustomOptions.ShapeCornerRadius = 5
        CustomOptions.StyleColors = True
        CustomGlowEffect.Enabled = False
        CustomGlowEffect.Color = clHighlight
        CustomGlowEffect.AlphaValue = 255
        CustomGlowEffect.GlowSize = 7
        CustomGlowEffect.Offset = 0
        CustomGlowEffect.Intensive = True
        CustomGlowEffect.StyleColors = True
        CustomGlowEffect.HotColor = clNone
        CustomGlowEffect.PressedColor = clNone
        CustomGlowEffect.FocusedColor = clNone
        CustomGlowEffect.PressedGlowSize = 7
        CustomGlowEffect.PressedAlphaValue = 255
        CustomGlowEffect.States = [scsFocused]
        CustomFrameColor = clNone
        CustomFrameColorAlpha = 255
        ShowCloseButton = True
        UseCustomOptions = False
      end
      item
        Page = scGPPageControlPage3
        Visible = True
        Enabled = True
        ImageIndex = -1
        Caption = '  '#20877#27969#28010'  '
        CustomOptions.NormalColor = clBtnShadow
        CustomOptions.ActiveColor = clBtnFace
        CustomOptions.MouseInColor = clBtnShadow
        CustomOptions.FocusedColor = clBtnFace
        CustomOptions.NormalColorAlpha = 70
        CustomOptions.ActiveColorAlpha = 230
        CustomOptions.MouseInColorAlpha = 40
        CustomOptions.FocusedColorAlpha = 255
        CustomOptions.FrameNormalColor = clBtnText
        CustomOptions.FrameActiveColor = clBtnText
        CustomOptions.FrameMouseInColor = clBtnText
        CustomOptions.FrameFocusedColor = clBtnText
        CustomOptions.FrameWidth = 2
        CustomOptions.FrameNormalColorAlpha = 50
        CustomOptions.FrameActiveColorAlpha = 80
        CustomOptions.FrameMouseInColorAlpha = 60
        CustomOptions.FrameFocusedColorAlpha = 80
        CustomOptions.FontNormalColor = clBtnText
        CustomOptions.FontActiveColor = clBtnText
        CustomOptions.FontMouseInColor = clBtnText
        CustomOptions.FontFocusedColor = clBtnText
        CustomOptions.TabStyle = gptsShape
        CustomOptions.ShapeFillGradientAngle = 90
        CustomOptions.GradientColorOffset = 30
        CustomOptions.ShapeCornerRadius = 5
        CustomOptions.StyleColors = True
        CustomGlowEffect.Enabled = False
        CustomGlowEffect.Color = clHighlight
        CustomGlowEffect.AlphaValue = 255
        CustomGlowEffect.GlowSize = 7
        CustomGlowEffect.Offset = 0
        CustomGlowEffect.Intensive = True
        CustomGlowEffect.StyleColors = True
        CustomGlowEffect.HotColor = clNone
        CustomGlowEffect.PressedColor = clNone
        CustomGlowEffect.FocusedColor = clNone
        CustomGlowEffect.PressedGlowSize = 7
        CustomGlowEffect.PressedAlphaValue = 255
        CustomGlowEffect.States = [scsFocused]
        CustomFrameColor = clNone
        CustomFrameColorAlpha = 255
        ShowCloseButton = True
        UseCustomOptions = False
      end>
    TabIndex = 0
    ActivePage = scGPPageControlPage1
    StorePaintBuffer = False
    FreeOnClose = False
    object scGPPageControlPage3: TscGPPageControlPage
      Left = 0
      Top = 36
      Width = 529
      Height = 220
      HorzScrollBar.Tracking = True
      VertScrollBar.Tracking = True
      BorderStyle = bsNone
      Color = clWhite
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      TabOrder = 2
      Visible = False
      WallpaperIndex = -1
      CustomBackgroundImageIndex = -1
      FluentUIOpaque = False
      StorePaintBuffer = False
      BGStyle = scgppsColor
      object scGPPanel1: TscGPPanel
        Left = 64
        Top = 64
        Width = 100
        Height = 41
        FluentUIOpaque = False
        TabOrder = 0
        BlurBackground = False
        BlurBackgroundAmount = 5
        BackgroundStyle = gppbsColor
        ContentMarginLeft = 0
        ContentMarginRight = 0
        ContentMarginTop = 0
        ContentMarginBottom = 0
        CustomImageIndex = -1
        DragForm = False
        DragTopForm = True
        DrawTextMode = scdtmGDI
        FillGradientAngle = 90
        FillGradientBeginAlpha = 255
        FillGradientEndAlpha = 255
        FillGradientBeginColorOffset = 25
        FillGradientEndColorOffset = 25
        FrameWidth = 2
        FillColor = clBtnFace
        FillColorAlpha = 150
        FillColor2 = clNone
        FrameColor = clBtnShadow
        FrameColorAlpha = 255
        FrameRadius = 0
        ShowCaption = False
        CaptionGlowEffect.Enabled = False
        CaptionGlowEffect.Color = clBtnShadow
        CaptionGlowEffect.AlphaValue = 255
        CaptionGlowEffect.GlowSize = 7
        CaptionGlowEffect.Offset = 0
        CaptionGlowEffect.Intensive = True
        CaptionGlowEffect.StyleColors = True
        Color = clBtnFace
        Caption = 'scGPPanel1'
        TransparentBackground = True
        StorePaintBuffer = True
        Sizeable = False
        WallpaperIndex = -1
        WordWrap = False
      end
    end
    object scGPPageControlPage2: TscGPPageControlPage
      Left = 0
      Top = 36
      Width = 529
      Height = 220
      HorzScrollBar.Tracking = True
      VertScrollBar.Tracking = True
      BorderStyle = bsNone
      Color = clWhite
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      TabOrder = 1
      Visible = False
      WallpaperIndex = -1
      CustomBackgroundImageIndex = -1
      FluentUIOpaque = False
      StorePaintBuffer = False
      BGStyle = scgppsColor
      object Panel1: TPanel
        Left = 72
        Top = 56
        Width = 185
        Height = 41
        Caption = 'Panel1'
        TabOrder = 0
      end
    end
    object scGPPageControlPage1: TscGPPageControlPage
      Left = 0
      Top = 36
      Width = 529
      Height = 220
      HorzScrollBar.Tracking = True
      VertScrollBar.Tracking = True
      BorderStyle = bsNone
      Color = clWhite
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentColor = False
      ParentFont = False
      TabOrder = 0
      WallpaperIndex = -1
      CustomBackgroundImageIndex = -1
      FluentUIOpaque = False
      StorePaintBuffer = False
      BGStyle = scgppsColor
      object Button1: TButton
        Left = 40
        Top = 64
        Width = 75
        Height = 25
        Caption = 'Button1'
        TabOrder = 0
      end
    end
  end
end

闪闪棉花糖
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
StyleController控件介绍（窗体风格02）
ClearLoveQ的博客
07-02 2655
StyleController名称为风格控制器，其主要目的是统一窗体内各控件的显示风格，方便将来的修改。1、先在项目中添加一个StyleController控件，指定其appearance中的配色方案及相应的字体等风格化的内容2、再添加其它控件，比如说TextEdit等,将其StyleController指定为上一步添加的控件名（因为该控件是DevExpress的控件，所以只有DevExpress...
StyleControls_v.4.0_XE2-XE10.2
09-19
StyleControls Overview StyleControls VCL is a powerfull package of components, which uses Classic drawing, system Themes, GDI+ and VCL Styles. This package contains the unique solutions to extend standard VCL controls and also has many unique, advanced controls to create Windows 10 Modern UI Applications (UWP design). Also with this package you can really improve applying and using of VCL Styles in your application. StyleControls is intended for use with: Delphi XE2-XE8, 10 Seattle, 10.1 Berlin, 10.2 Tokyo C++Builder XE2-XE8, 10 Seattle, 10.1 Berlin, 10.2 Tokyo
【玩转控件系列】Style控件组之TscGpButton控件 --仿制CSDN的工具栏效果
cc001100的博客
08-14 1188
下图为CSDN的一个web工具栏效果：    Delphi制作效果如图： 制作步骤如下： 1.放置一个Panel，如图设置：  2.再放置一个Panel，为P_tools   3.放一个图片List   4.放置一个GpButton： 属性设置1 对其和外间距设置：            属性设置2 颜色设置： 属性设置3 图片设置： 5.复制...
StyleControl Button模板样式
钱多多的博客
07-12 512
unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, cxButtons, scControls, scGPControls, Vcl.Buttons, System.ImageList, Vc.
StyleControls的一些使用方法设置布局
钱多多的博客
07-04 1719
1、首先在项目的options 中 Application中 Appearance 中选择应用的皮肤 Default style 下拉选择Windows10 吧 这里主要是用于scStyledForm1 中添加的安扭能显示生效 dpr 文件 program StyleForm; uses Vcl.Forms, Unit3 in 'Unit3.pas' {Form3}, Vcl.Themes, Vcl.Styles; {$R *.res} begin Application.In.
cxgrid属性说明
GuoGuoABC
06-14 414
MyTV.DataController.Search.Locate(MyTV.GetColumnByFieldName(FieldName).Index, 查找值);////分区分大小写。//提取FooterItems;//提取Footer;
almdev stylecontrol V4.94
09-17
almdev stylecontrol V4.94 是这个库的最新版本，为开发者提供了丰富的皮肤控件和高级功能，使得应用程序的界面设计更加便捷且具有吸引力。 在almdev stylecontrol V4.94中，以下几个核心知识点值得深入探讨： 1. ...
StyleControl v4.20 完整版含源代码
11-30
应观众要求，放上4.20版 会用的请自己下载编译及安装 想试试的，请寻找教程自修如何安装 来乱的，麻烦您走远一点 这个世界没有什么佛心，我只带着魔心来分享 18/11/30 用BitDefender扫描过，不带毒。...
AlmediaDev StyleControls v5.16 Source
07-31
AlmediaDev StyleControls v5.16是一款专为Delphi开发者设计的高级UI控件库，它提供了丰富的自定义样式和控制功能，极大地提升了Delphi应用程序的界面美观度和用户体验。本篇将深入探讨StyleControls库的核心特性、...
StyleControls 4.92 D11.rar
01-18
- TCoolBarStyleHook (TCoolBar control) and TToolBarStyleHook (TToolBar control) classes to new TscTCoolBarStyleHook and TscToolBarStyleHook (you must add scControls unit to the project).
自定义Control按钮—Demo
10-06
自定义UIControl控件的例子。 功能：通过手势滑动，调节进度条的进度。通过如果进度条改变了，触发UIControlChangeValue消息。
StyleControls_3.89_for_XE2-XE10.2_超级漂亮的皮肤控件+国外网站下载来的+个人收藏
05-21
StyleControls_3.89_for_XE2-XE10.2_超级漂亮的皮肤控件+国外网站下载来的+个人收藏，完爆国内的其它皮肤，喜欢的朋友可以下载下来玩玩，相当不错！
StyleControls(皮肤控件) 4.53 源码免安装版
10-10
StyleControls(皮肤控件) 4.53 源码免安装版，支持XE2-10.3版本。StyleControls是针对开发者打造的一款强大皮肤控件，它包含了独特和高级的可以扩展标准的VCL控件，基于BusinessSkinForm VCL和DynamicSkinForm VCL，可以与Delphi XE以及C++Builder编程软件完美兼容，软件丰富的元素和控件供用户选择，包含一些主题风格、高级按钮以及复选框等，支持64位操作系统。
StyleControls v3.9.6 Tokyo最新破解文件
06-03
StyleControls最新版本，源文件可以去官方网站下载并使用下载的两个文件覆盖即可，只提供了Tokyo 10.2.3的破解 http://www.almdev.com/main/downloads.htm
StyleControls xe2-Rad10.3 Fullsource sc420
04-01
StyleControls是一款功能强大的套包控件，包含了独特的高级可扩展标准VCL控件的解决方案和控件，各种风格和高级按钮、复选框、发光效果、动画效果等，支持Delphi/C++Builder XE2-XE10.3。简单和可调整控件的标准主题和VCL风格，有需要的朋友可以下载！
MFC list control 内嵌按钮以及样式
07-05
标题“MFC list control 内嵌按钮以及样式”指的是如何在List Control中嵌入按钮，并且调整其样式以实现特定的用户交互和界面设计。 List Control本身是CListCtrl类的实例，它是CWnd类的派生类，提供了丰富的功能，...
AlmediaDev Style Controls - 4.55 Full Source-最新源代码版
weixin_46062724的博客
02-13 475
版本4.55 改进：RTL支持TscDrawGrid，TscStringGrid和TscDBGrid控件 添加了：TscGPPanel控件的ContentMargin ...属性（与TscGPLabel中一样） 新增：用于编辑控件的CustomDraw属性（使用它可以防止通过OnDrawBackground事件在非焦点编辑中绘制任何内容） 固定：具有只读数据链接的TscDBToggleSwi...
数据可视化库二--Seaborn
weixin_38239039的博客
05-06 340
1、
Delphi ControlState和ControlStyle属性详解
不得闲.闲忆居
01-19 3476
ControlState 属性 对应对象：TControl 声明：TControlState = set of (csLButtonDown, csClicked, csPalette, csReadingState, csAlignmentNeeded, csFocusing, csCreating); property ControlState: TControlState; 功能：C
spreadsheetcontrol style
最新发布
12-29
SpreadsheetControl是一种用于创建和管理电子表格的控件样式。它可以让用户轻松地创建和编辑表格数据，具有丰富的样式功能，使表格看起来更加美观和易于阅读。 控件样式可以包括表格的外观设计、排版、字体样式、颜色和边框等方面。SpreadsheetControl提供了多种样式选项，用户可以根据自己的需求自定义表格的外观，例如可以选择不同的颜色主题，调整字体大小和颜色，添加边框和背景色等。这些样式功能可以帮助用户创建具有个性化风格的表格，并且使表格更加清晰易读。 除了外观设计之外，SpreadsheetControl还提供了丰富的数据格式化功能。用户可以通过设置样式来突出显示某些数据，如加粗、斜体或下划线以及添加特定的图标或符号。此外，用户还可以使用条件格式化功能来根据数据值的大小、范围或其他标准来自动应用样式，从而更加直观地呈现数据。 总的来说，SpreadsheetControl的样式功能可以帮助用户设计和管理表格的外观，使表格更加美观、易读和直观。无论是个人用户还是企业用户，SpreadsheetControl的样式功能都能够满足用户定制化的需求，提高用户的工作效率和数据呈现效果。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值