Edit1.SetFocus;
SendMessage(Edit1.Handle,EM_SETSEL,-1,0);
SendMessage(Edit1.Handle,EM_SETSEL,-1,0);
解决方案 »
- delphi webbrowser求助大虾
- 两个程序之间传递字符串如何处理?
- 求TWinControl继承下的TShape!
- 同一单元类之间的相互引用问题
- 怎样使点击DBNavigator的Delete按钮时显示中文对话框
- 我想把任意的二进制文件读出来再写成另外一个文件。
- 高分求解:用 Indy 的 FTP 控件下载文件时怎么做进度条?
- 请问怎可以实现当在edit1中输入一定字数后光标会自动跳到edit2中啊??
- adotable对象打开数据表时,如何按 sortfield 字段排序?
- 如何修改文件属性?
- 难道用locate()就不能实现记录的继续查找吗?非用sql不可吗?为什么没有人回答??谢谢了,各位大侠!!
- 闲来无事,写了个解释全部的BDECODE的全程
SendMessage(Edit1.Handle,EM_SETSEL,-1,0);
SendMessage(Edit1.Handle,EM_SETSEL,-1,0);
Edit1.SetFocus;
Edit1.SelStart:=1;
Edit1.SelLength:=0;
SendMessage(Edit1.Handle,EM_SETSEL,-1,0);
Edit1.SetFocus;
Edit1.SelStart:=2;
Edit1.SelLength:=0;
Edit1.SelStart := iPos + 2;
begin
if (Key = 'w') or (Key = 'W') then
begin
Key := #0;
Edit1.SelText := '我';
end;
end;
Edit1.SelStart:=光标的位置;
Edit1.SelLength:=0;