📜  delphi 如何将光标移动到下一个 TEdit - 任何代码示例

📅  最后修改于: 2022-03-11 14:55:37.990000             🧑  作者: Mango

代码示例1
procedure Edit1KeyPress(Sender: TObject; var Key: Char);
begin
    if Key = #13 then
    begin
        Key := #0;
          ActiveControl := Edit2;
    end;
end;