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 edit 让密码变成点

Delphi jpg图片 旋转 切边 缩放

Delphi 详解 enumwindows 与 enumwindowsproc

Delphi产生不重复随机数的算法

Delphi 从字符串中提取单词、从字符串中提取汉字的函数

Delphi exe注入代码

Delphi unigui unicheckbox勾选

Delphi 62 进制的简单实现

Delphi中的instrrev函数(倒找文本)

Delphi fdconnection1.gettablenames 查看所有表包含用户表和系统表

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

转载请注明出处：木庄网络博客 » Delphi XE5 给Edit增加自定义按钮