Firemonkey TEdit 切換不同 KeyboardType 樣式，firemonkeytedit

Firemonkey TEdit 切換不同 KeyboardType 樣式，firemonkeytedit

用代碼切換 Edit 不同的鍵盤樣式：

procedure TForm1.Button1Click(Sender: TObject);
begin
     Edit1.KeyboardType := TVirtualkeyboardType.Default;
     Edit1.SetFocus;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
     Edit1.KeyboardType := TVirtualkeyboardType.NumberPad;
     Edit1.SetFocus;
end;