码迷,mamicode.com
首页 > 移动开发 > 详细

[调整] Firemonkey iOS 原生 Edit 改变框色或透明框

时间:2016-08-30 19:24:50      阅读:155      评论:0      收藏:0      [点我收藏+]

标签:

说明:iOS 原生 Edit 透明框

方法:

技术分享

效果:

技术分享

 

 

说明:iOS 原生 Edit 设定框色

适用:Berlin Firemonkey

代码修改说明:

  1. 请将源码 FMX.Edit.iOS.pas 复制到自己的工程目录里,再进行修改。
  2. 代码内 {+++> 代表我增加的代码
  3. 代码内 {---> 代表我删除的代码
  4. 未来新版 Delphi 可以自己将 {+++> {---> 移植到新版代码内
constructor TiOSNativeEdit.Create;
begin
  inherited;
  FTextFieldDelegate := TiOSTextFieldDelegate.Create(Self);
  View.setExclusiveTouch(True);
  View.setBorderStyle(UITextBorderStyleRoundedRect);
{+++>}
  // by Aone
  View.layer.setBorderColor(TUIColor.Wrap(TUIColor.OCClass.whiteColor).CGColor); // 白色
  View.layer.setCornerRadius(0);
  View.layer.setBorderWidth(2);
{<+++}
  View.setDelegate((FTextFieldDelegate as ILocalObject).GetObjectID);
  FPreviousSelection := NSMakeRange(NSNotFound, NSNotFound);

  RegisterNativeEventHandler(ControlEventEditingChanged, UIControlEventEditingChanged);
  RegisterNativeEventHandler(ControlEventEditingDidEnd, UIControlEventEditingDidEnd);
end;

效果:

技术分享

 

[调整] Firemonkey iOS 原生 Edit 改变框色或透明框

标签:

原文地址:http://www.cnblogs.com/onechen/p/5823261.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!