Delphi Firemonkey Android TEdit大文字の複製テキスト - アンドロイド、デルファイ、firemonkey、delphi-10-seattle

私はDelphi Seattleを使用していますが、 edit 入力したテキストを書き込みたい uppercase。私はこのコードを使用しています：

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

最初の文字は正しく出力されますが、3番目の文字からテキストが複製され始めます Edit.

回答：

TEditのプロパティを選択する必要があります KeyboardType に アルファベット.