Delphi XE5 给Edit增加自定义按钮


本文整理自网络,侵删。

 手机上的Edit,如果增加一个按钮,会非常方便用户操作,XE5为我们想到了,下面看看如何为一个TEdit增加一个按钮:
1.在Form上放一个TEdit,然后双击Edit,会弹出增加按钮的窗口

2.选择增加按钮的类型,目前支持7个:


3.选择后,点Add Item,会生成一个按钮对象,和正常的Button是一样的,这里,我们增加一个Clear按钮,用来清空Edit的内容:



4.编码新增按钮的Click事件:
procedure TForm1.ClearEditButton1Click(Sender: TObject);
begin
  Edit1.Text:='';
end;
5.可以为Edit增加多个按钮。


结论:这开发效率,不减当年!

相关阅读 >>

Delphi 用dll实现插件的简单演示

Delphi 在内存中直接运行exe类型的资源文件

Delphi定时器相关的简单例子

Delphi webbroker isapi 示例说明

Delphi 清除字符串两边空格或指定字符

Delphi中用ado连接加密access数据库

Delphi xe5 将Delphi code从winos 迁移到ios与android

Delphi实现qq右下角弹出信息窗口

Delphi在64位系统下读写注册表

Delphi 同时激活两个窗体

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...