combobox的光标定位问题,让光标定位到combobox的最后一个字符后面.(100分)

  • 主题发起人 主题发起人 xiaolv
  • 开始时间 开始时间
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;
时,就不起作用了。不知这个问题,该如何解决.
 
procedure TForm1.ComboBox1Enter(Sender: TObject);
begin
//模拟按下End键
keybd_event(VK_END,$45,KEYEVENTF_EXTENDEDKEY or 0, 0);
keybd_event(VK_END,$45,KEYEVENTF_EXTENDEDKEY or KEYEVENTF_KEYUP, 0);
end;
 
谢谢,回答一针见血。我喜欢:)
 
后退
顶部