X
xiaolv
Unregistered / Unconfirmed
GUEST, unregistred user!
大家好,我在编程中,遇到一个问题,如下:
在Edit1中,我用程序可以这样控制,
procedure TForm1.Edit1Enter(Sender: TObject);
begin
edit1.SelStart:=length(edit1.text)+1;
end;
这样,当焦点切换到Edit1时,光标就会落在Edit1最后一个字符后面。但是
我用
procedure TForm1.ComboBox1Enter(Sender: TObject);
begin
combobox1.SelStart:=length(combobox1.text)+1;
end;
时,就不起作用了。不知这个问题,该如何解决.
在Edit1中,我用程序可以这样控制,
procedure TForm1.Edit1Enter(Sender: TObject);
begin
edit1.SelStart:=length(edit1.text)+1;
end;
这样,当焦点切换到Edit1时,光标就会落在Edit1最后一个字符后面。但是
我用
procedure TForm1.ComboBox1Enter(Sender: TObject);
begin
combobox1.SelStart:=length(combobox1.text)+1;
end;
时,就不起作用了。不知这个问题,该如何解决.