[調整] Firemonkey iOS 原生 Edit 透明框, 改變框色

說明：iOS 原生 Edit 透明框

適用：Berlin Firemonkey

方法：在 StyleLookup 輸入 transparentedit

效果：

如果有圖片 Image 在這二個 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;

效果：