Firemonkey TEdit 切换不同 KeyboardType 样式

用代码切换 Edit 不同的键盘样式：

=<span style="color: #0000ff;">procedure<span style="color: #000000;"> TForm1.Button2Click(Sender: TObject);
<span style="color: #0000ff;">begin<span style="color: #000000;">
Edit1.KeyboardType :=<span style="color: #000000;"> TVirtualkeyboardType.NumberPad;
Edit1.SetFocus;
<span style="color: #0000ff;">end;