如何把光标定位在Edit1里的字符串(CK1001)第2位个置(CK)后面???快分!

78hgdong 2005-02-24 03:50:46
如在Edit1输入了CK1001,回车查询数据后,再把光标定位在CK后面,这样可以方便的输入1002数字了,不用在重复输入CK了,请问如何定位???
各位老大帮忙!TKS!
...全文
70 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
78hgdong 2005-02-24
  • 打赏
  • 举报
回复
已经结贴!
78hgdong 2005-02-24
  • 打赏
  • 举报
回复
谢谢! jinjazz(近身剪(N-P攻略)) 老大!
jinjazz 2005-02-24
  • 打赏
  • 举报
回复
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then
begin
{...查询数据库代码}
Edit1.SelStart:=2;
Edit1.SelLength:=length(Edit1.Text)-2;
end;
end;

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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