高手请进，继承了一个TSPEEDBUTTON的按钮，想切掉其个角也就是想变换圆角的区域。该怎么做？

tianxueshan 2006-05-19 02:21:22

继承了一个TSPEEDBUTTON。想把它的四个角切掉。然而它没有句柄，不能用SETWINDOWSRGN来赋值。该怎么做？

...全文

195 2 打赏收藏转发到动态举报

写回复

2 条回复

切换为时间正序

请发表友善的回复…

发表回复

tianxueshan 2006-05-19

打赏
举报

回复

它能响应单击事件吗？

wudi_1982 2006-05-19

打赏
举报

回复

你从Tshap继承多好，不用画了，直接设置个圆就可以了。

在标准的Windows程序中所有按钮均没有颜色。因此Delphi提供的所有按钮组件也均无颜色属性，有时你可能做了一个五颜六色的程序界面，而按钮颜色可能很不相称。在此本人提供一种用自定义组件制作有颜色属性的铵钮的方法，它遵循了Delphi的组件定义规则，完成后该按钮与普通按钮（Button）相比，多了一个Color属性，你可以永远地使用它，在设计阶段随意地改变颜色，就象是Delphi本身提供的组件一样（本文代码在Delphi 4.0下完成)。

Additional组件页 1、TBitBtn组件：该组件是表面显示位图的位图按钮组件，该组件的行为与Tbutton组件相同。虽然一个TBitBtn组件只能与一个位图相关联，但该位图可以平分为4个部分，分别在按钮处于弹起、按下、禁止和单机状态时显示。 2、TSpeedButton组件：该组件是一个按钮，用于执行一个命令。该组件与Tbutton、Tbitbtn不同，它不是从窗口组件派生的，因此，没有windows句柄，不能获得焦点。但是，该组件具有单机事件，并且能够存储位图。 3、TMaskEdit组件：该组件用于建立掩码文本编辑框，这种文本编辑框与用Edit和RichEdit建立的文本框不同在于规定了文本的格式（即掩码）以避免用户输入非法格式的文本。 4、TStringGrid组件：该组件是一个字符串表格组件，用于简化字符串与关联对象间的操作。该组件提供了许多属性来控制表格的外观，同时也提供了许多方法、事件以电子表格的形式响应用户的动作，此外，该组件还将表格中的字符串关联一个对象，这些对象通过字符串封装了一些信息和行为供用户使用。 5、TImage组件：用TImage组件在窗体上显示一张图片，用TPicture对象在Picture属性中指定一个图标、图元文件、位图图像或用户定义的图像。

Delphi以图形按钮显示的界面.pdf

Delphi无标题栏改变窗口大小..rar`

这是 Lazarus IDE 的一个组件，是具有重复属性的 TSpeedButton 的后代。因此，如果您将鼠标按住按钮，它将重复 onClick 事件中的代码，直到释放鼠标。有两个属性： StartInterval - 按钮在按下鼠标后 xx ms 后开始重复代码。这是必要的，因为如果按钮立即开始重复代码，它会重复代码几次，即使您只给鼠标单击！ Repeatinterval - 重复之间的间隔。

5,939

社区成员

262,944

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章