Delphi 选择edit1.text的部分内容
edit1.selectall;//全选如果只选择Edit1.text的最后两个字符，怎么写？...
edit1.selectall;//全选
如果只选择Edit1.text的最后两个字符，怎么写？ 展开
如果只选择Edit1.text的最后两个字符，怎么写？ 展开
3个回答
展开全部
Edit1.SetFocus;
edit1.SelStart:=Length(Edit1.Text)-2;
Edit1.SelLength:=2;
edit1.SelStart:=Length(Edit1.Text)-2;
Edit1.SelLength:=2;
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
Var
StrEdt: string;
begin
StrEdt:=copy(trim(Edit1.text),length(trim(Edit1.text))-1,2);
Edit1.SetFocus;
edit1.SelStart:=Length(Edit1.Text)-2;
Edit1.SelLength:=2;
end;
StrEdt: string;
begin
StrEdt:=copy(trim(Edit1.text),length(trim(Edit1.text))-1,2);
Edit1.SetFocus;
edit1.SelStart:=Length(Edit1.Text)-2;
Edit1.SelLength:=2;
end;
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
Edit1.SetFocus;
edit1.SelStart:=Length(Edit1.Text)-2;
Edit1.SelLength:=2;
这个正确
edit1.SelStart:=Length(Edit1.Text)-2;
Edit1.SelLength:=2;
这个正确
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
