VerySource

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 1009|回复: 9

怎样才能让speedbutton显示水平居中的三个实心圆点

[复制链接]

1

主题

5

帖子

4.00

积分

新手上路

Rank: 1

积分
4.00
发表于 2020-1-3 14:20:02 | 显示全部楼层 |阅读模式
请问各位高手:
    通过更改哪个属性,可以让speedbutton的caption为三个点,
回复

使用道具 举报

0

主题

53

帖子

29.00

积分

新手上路

Rank: 1

积分
29.00
发表于 2020-1-3 22:03:01 | 显示全部楼层
speedbutton的caption本来就是居中的,可能是字体或者按钮高度的问题没有调整到位

在speedbutton的create里创建了一个TButtonGlyph类
该类可以用来进行外观行为的调整
该类下有一个私有成员方法
procedure TButtonGlyph.DrawButtonText(Canvas: TCanvas; const Caption: string;
  TextBounds: TRect; State: TButtonState; BiDiFlags: LongInt);
begin
  with Canvas do
  begin
    Brush.Style := bsClear;
    if State = bsDisabled then
    begin
      OffsetRect(TextBounds, 1, 1);
      Font.Color := clBtnHighlight;
      DrawText(Handle, PChar(Caption), Length(Caption), TextBounds,
        DT_CENTER or DT_VCENTER or BiDiFlags);
      OffsetRect(TextBounds, -1, -1);
      Font.Color := clBtnShadow;
      DrawText(Handle, PChar(Caption), Length(Caption), TextBounds,
        DT_CENTER or DT_VCENTER or BiDiFlags);
    end else
      DrawText(Handle, PChar(Caption), Length(Caption), TextBounds,
        DT_CENTER or DT_VCENTER or BiDiFlags);
  end;
end;
回复

使用道具 举报

0

主题

2

帖子

2.00

积分

新手上路

Rank: 1

积分
2.00
发表于 2020-1-4 18:12:01 | 显示全部楼层
SpeedButton.caption := '...';

这样不就行了? 给你弄糊涂了.
回复

使用道具 举报

1

主题

5

帖子

4.00

积分

新手上路

Rank: 1

积分
4.00
 楼主| 发表于 2020-1-5 09:45:01 | 显示全部楼层
可能是我没讲清楚,我要的是如memo组件中的lines属性右边的带三点的选择按钮。我以前有做过,现在忘了,但可以肯定是更改了speedbutton的某个属性值就成了
回复

使用道具 举报

0

主题

53

帖子

29.00

积分

新手上路

Rank: 1

积分
29.00
发表于 2020-1-5 09:54:01 | 显示全部楼层
晕了,楼主准确得描述一下,你现在做社么,需要一个社么东西,是要创建组件吗?
回复

使用道具 举报

1

主题

5

帖子

4.00

积分

新手上路

Rank: 1

积分
4.00
 楼主| 发表于 2020-1-5 10:18:01 | 显示全部楼层
其实很简单,我需要一个如memo组件中的lines属性右边的带三点的选择按钮,只要它的外形
回复

使用道具 举报

0

主题

53

帖子

29.00

积分

新手上路

Rank: 1

积分
29.00
发表于 2020-1-5 12:36:01 | 显示全部楼层
自己做呀 是嵌入到其它组件
中吗?
回复

使用道具 举报

1

主题

5

帖子

4.00

积分

新手上路

Rank: 1

积分
4.00
 楼主| 发表于 2020-1-5 13:42:01 | 显示全部楼层
speedbutton就可以设置成这种外形,但具体怎样设置我忘了
回复

使用道具 举报

0

主题

12

帖子

12.00

积分

新手上路

Rank: 1

积分
12.00
发表于 2020-1-21 20:00:02 | 显示全部楼层
SpeedButton支持图片的. 画个三个圆点的图片不难吧
回复

使用道具 举报

1

主题

5

帖子

4.00

积分

新手上路

Rank: 1

积分
4.00
 楼主| 发表于 2020-1-23 18:36:01 | 显示全部楼层
楼上说的我也知道,但我寻求的是一种方法,一种改变speedbutton属性就能实现需求的方法
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|CopyRight © 2008-2023|verysource.com ( 京ICP备17048824号-1 )

快速回复 返回顶部 返回列表