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增加多个按钮。
结论：这开发效率，不减当年！
1.在Form上放一个TEdit，然后双击Edit,会弹出增加按钮的窗口
2.选择增加按钮的类型，目前支持7个：
3.选择后，点Add Item,会生成一个按钮对象，和正常的Button是一样的,这里，我们增加一个Clear按钮，用来清空Edit的内容:
4.编码新增按钮的Click事件：
procedure TForm1.ClearEditButton1Click(Sender: TObject);
begin
end;
5.可以为Edit增加多个按钮。
结论：这开发效率，不减当年！
推荐分享
图文皆来源于网络，内容仅做公益性分享，版权归原作者所有，如有侵权请告知删除！
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.063224077224731 seconds