Question

delphi 怎么在edit文本框里边输入边选中呢

例：在edit1里输入字母A，A是选中状态，再输入字母B那么就是字母AB处于选中状态

Answer 1

不要看四级菜鸟的错误答案
一下程序经过验证的.............
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = #8 then
Edit1.Clear
else
begin
Edit1.Text:=Edit1.text+key;
key:=#0;
Edit1.SelectAll;
end;
end;

Answer 2

在edit1的onchange事件中写代码
Edit1.SelectAll;