Question

delphi怎么光标锁定然后清除edit的内容

就像qq登录一样把光标锁定edit中，里面的提示语句：密码，就清除了

Answer 1

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
Edit1.selStart:= length(Edit1.Text);
end;
应该写这吧

不过这种控制实在是不人性化

确实KEYDOWN只能在输入时触发，但是根据楼主的要求，很明显是要求输入时候做此限制，他的意思应该是输入的时候不可以随意调整光标位置，如果通过代码赋值，根本不会存在此需求，另外之所以写在keydown里面而不写在OnChang里面，可以自己做个简单的测试对比下，结果很快就可以分辨出来了