下图是该控件实现的一些按钮实例:
scGPControls.pas
一个按钮组件,可以创建很多风格、形状的按钮组件。
属性 | 类型 | 说明 |
---|---|---|
Images | TCustomImageList | 按钮关联的图片集 |
ImageIndex | Integer | 按钮正常时的图片索引 |
HotImageIndex | Integer | 鼠标移上时的图片索引 |
PressedImageIndex | Integer | 按下鼠标时的图片索引 |
FocusedImageIndex | Integer | 获得焦点时的图片索引 |
Margin | Integer | 文本和图片的位移(-1时图片和文本居中) |
Spacing | Integer | 图片与文本之间的间隔值 |
Layout | TButtonLayout | 图片与文本的布局关系 |
Animation | Boolean | 按钮动画效果是否启用 |
CanFocused | Boolean | 按钮是否可以有焦点 |
RepeatClick | Boolean | 按下时是否重复点击 |
RepeatClickInterval | Integer | 重复点击的时间间隔 |
GlowEffect | 按钮的发光效果 | |
DropDownMenu | TPopupMenu | 按钮的下拉菜单 |
SplitButton | Boolean | 为真时,呈现分割按钮的效果 |
ShowFocuRect | Boolean | 是否显示焦点框 |
Down | Pressed | 按钮的按下状态 |
GroupIndex | Integer | 按钮的分组索引 |
AllowAllUp | Boolean | 是否允许按钮都处于弹起状态(当按钮在一个分组时) |
GalleryMenu | ||
UseGalleryMenuImage | Boolean | 为真时,从GalleryMenu 菜单项的图片 |
UseGalleryMenuCaption | Boolean | 是否使用GalleryMenu菜单项的标题 |
TransparentBackground | Boolean | 按钮背景透明 |
Options | TscGPButtonOptions | 该属性可用于调整按钮形状、不同状态的边框。 - ShapeStyle 按钮的形状 (scgpssRect, scgpssRoundedRect, scgpRoundedLeftRight,scgpSegmentedLeft scgpSegmentedLeftRounded,scgpSegmentedRight scgpSegmentedRightRounded, scgpSegmentedMiddle,scgpTabLeft, scgptableftround, scgpTabRight, scgptabrighttround, scgpTabTop, scgpTabBottom,scgpEllipse scgpRounded) - ShapeFillStyle 按钮的填充风格 (scgpsfColor, scgpsfGradient) - ShapeFillGradientAngle 按钮填充过渡色的角度 - ShapeFillGradientPressedAngle 按钮按下时的填充过渡色的角度 - ShapeCornerRadius 按钮四周圆角的弧度 |
ShowGalleryMenuFromTop | Boolean | 在按钮的上面显示GalleryMenu菜单 |
ShowGalleryMenuFromRight | Boolean | 从按钮的右侧显示GalleryMenu菜单 |
ShowMenuArrow | Boolean | 如果GalleryMenu <> nil or DropDownMenu <> nil 则按钮上会有个箭头就会显示出来 |
ShowCaption | Boolean | 显示或隐藏按钮的标题 |
WidthWithCaption, | Integer | 按钮的宽度值 |
ArrowPosition | TscArrowPosition | TscArrowPosition = (scapRight, scapBottom); |
UseImagesFromAction | Boolean | 是否从Action获取图片 |
UseImageIndexFromAction | Boolean | 是否使用Action 的ImageIndex |
WordWrap | Boolean | 按钮的标题是否可以折行显示 |
CustomDropDown | Boolean | 为真时,可以使用 dropdown form(下拉窗体) |
ImageMargin | Integer | 为按钮中的图像指定位置。这个属性非常有用,例如在TscSplitView控件上。设置ImageMargin = TscSplitView.CompactWidth和按钮将适当地缩放图像的区域(图像始终位于矩形的中心,由该属性定义) |
ScaleMarginAndSpacing | Boolean | 是否缩放 margin 和 spacing 属性(当系统的DPI发生变化时) |
ScaleFrameWidth | Boolean | 是否缩放边框的宽度(当系统的DPI发生变化时) |
SplitButton | Boolean | 为真时,分割按钮 |
名称 | 类型 | 说明 |
---|---|---|
OnPaint | TscPaintButtonEvent | 绘制事件 |
OnDropDown | TNotifyEvent | 用这个事件可以调用一个下拉Form窗体: MyDropDownForm.scStyledForm1.DropDown(scButton1); |
OnCloseUp | TscButtonCloseUpEvent | 用这个事件可以关闭一个下拉Form窗体: if AAcceptChanges then scButton1.Caption :=MyDropDownForm.scListView1.Selected.Caption; |
名称 | 说明 |
---|---|
CloseUp | 在下拉菜单上使用这个方法在关闭下拉菜单后重新绘制: procedure TDropDownForm.scStyledForm1CloseUp(ADropDownForm: TCustomForm; ADropDownControl: TControl; AAcceptChanges: Boolean);begin if ADropDownControl <> nil then begin if ADropDownControl is TscButton then TscButton(ADropDownControl).CloseUp(AAcceptChanges); end; end; |
更多交流可以加入我们的学习群:
注:该文档为本站原创作品,请勿转载。
|