当edit框获得焦点的时候,怎么使它光标自动定位在第i个字符

qyc0921 2003-07-15 08:26:23
up
...全文
100 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
wsz1995 2003-07-15
  • 打赏
  • 举报
回复
应该从TEdit继承一个类,
并重载消息WM_SETFOCUS处理方法,或许更好一些。
fhuibo 2003-07-15
  • 打赏
  • 举报
回复
gz
shuixin13 2003-07-15
  • 打赏
  • 举报
回复
发键盘消息总是可以的吧
tonycjl 2003-07-15
  • 打赏
  • 举报
回复
procedure TCSRForm.Button2Click(Sender: TObject);
begin
edit1.SetFocus ;
end;

procedure TCSRForm.Edit1Enter(Sender: TObject);
begin
edit1.SelStart :=2;
edit1.SelLength :=0;
end;
测试成功
yzykjh 2003-07-15
  • 打赏
  • 举报
回复
edit必须先得到焦点,然后用edit1.selstart:=i;
Goldteerfei 2003-07-15
  • 打赏
  • 举报
回复
cxz7531(cat)的方法好象不行。我也没有解决。
cxz7531 2003-07-15
  • 打赏
  • 举报
回复
edit.selstart:=i

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧