如何将工具栏按钮的字形设置为空白？

我添加一个带有一些标准Delphi组件的工具栏到我的应用程序。不幸的是，愚蠢的箭头是第一个字形（有人甚至知道它是什么？）如何将工具栏按钮的字形设置为空白？

我想完全摧毁它，或者至少，将itcs图标设置为空白，以便它融入工具栏。

我该怎么做？

我需要一些可以执行两次而不会导致异常的代码。谢谢

来源

2010-09-19 user448969

如果您提到“愚蠢的箭头”，我想知道是否有像“智能箭头”之类的东西。 – 2010-09-19 08:36:43

没关系 - 你能解释一下你想达到的目标吗？我不知道你的意思。 – 2010-09-19 08:37:25

TToolButton从结合其ImageIndex属性与封闭的工具栏的Images属性中获取其图像，该属性指的是TImageList。要使工具栏按钮没有图像，请分配ImageIndex := -1。

要在设计时从TSpeedButton中删除字形，请选择该按钮，然后在对象检查器中选择Glyph属性。按删除清除该属性。要在运行时执行相同操作，请指定Button.Glyph := nil。

如果您有预先制作的工具栏，如TMediaPlayer或TDBNavigator，则无法自定义按钮。他们总是显示在控件中硬编码的箭头字形。不过，您可以选择隐藏或显示某些按钮。如果您只是为了获得一排按钮而放置控件，并且无意使用它们来播放媒体或导航数据库，则不要使用该控件。只需放置一个TPanel并在其上放置独立按钮。

来源

2010-09-19 15:48:43

如何将工具栏按钮的字形设置为空白？

回答

相关问题