Delphi Firemonkey Android TEdit 大写复制文本答案

【问题标题】：Delphi Firemonkey Android TEdit UpperCase Duplicating TextDelphi Firemonkey Android TEdit 大写复制文本
【发布时间】：2017-03-27 20:40:53
【问题描述】：

我正在使用 Delphi Seattle，并且有一个 edit，我希望将键入的文本写入 uppercase。我正在使用此代码：

procedure TF_Quiosque.edtCadNomeVisitanteChangeTracking(Sender: TObject);
begin
  edtCadNomeVisitante.Text := AnsiUpperCase(edtCadNomeVisitante.Text);
end;

第一个字母正确显示，但从第三个字母开始，Edit 中的文本开始重复。

【问题讨论】：

首先 - 不要将 ansi 函数与 unicode 字符串一起使用，但无论如何您在柏林的代码都可以正常工作
@AlexEgorov 我现在不能使用柏林。
这在Android下不行吗？对我来说，这适用于 Windows，现在无法在 Android 下检查。将您的线路更改为edtCadNomeVisitante.Text := edtCadNomeVisitante.Text.UpperCase;
@AlexEgorov 在 Windows 下完美运行，问题出在 Android 下。我试过edtCadNomeVisitante.Text := edtCadNomeVisitante.Text.UpperCase;但编译器返回错误There is no overloaded version of 'UpperCase' that can be called with these arguments
我的错误 - 应该使用edtCadNomeVisitante.Text.ToUpper

标签： android delphi firemonkey delphi-10-seattle

【解决方案1】：

你必须选择TEdit的属性KeyboardType到Alphabet。

【讨论】：