请教我在edit4按下回车后,edit2自动获得焦点,但是edit2.text我设置的是"bh:",这样焦点到edit2时,edit2.text就会变成全选状态。(就是字符bh被全选中)如果我直接输入内容,"bh:"就会被删除,我想当edit2获得焦点后光标能够自动移到"bh:"后进行输入,而不是在"bh:"全选的状态下输入。不知道是否明白
我的意思,请指教。谢谢!
procedure TForm4.RzEdit4KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then
edit2.SetFocus;
end;
我的意思,请指教。谢谢!
procedure TForm4.RzEdit4KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then
edit2.SetFocus;
end;
解决方案 »
- 悬赏:列出AD域里所有用户名,密码,邮箱等
- DBGridEh如何动态的添加列
- 问: DBGrid 添加记录后会把它当前所添加的下一行给履盖掉,有什么解决方法吗?
- 使用SetForeGroundWindow后,窗口不能最小化,如何处理?
- 请教Delphi中DCOM事件的实现问题
- 如何让dbgrid显示storedproc的返回结果
- 如何像Windows的搜索一样,能够搜索出来指定文件名进行搜索。急急
- delphi、c++ builder、vc三者,哪一种是你的最终选择,why?
- image
- 我刚刚从VC转向DELPHI,还请各位高手指教!!!
- 关于数据库驱动
- 关于:《请问21-27岁的女程序员,你们想嫁什么样的男人〉
procedure TForm1.Edit2Enter(Sender: TObject);
begin
edit2.SelStart := edit2.SelLength;
end;
edit2.SelStart:=length(edit2.Text);