关于数字值的定位。(在线等待)(100分)

笨笨1

Unregistered / Unconfirmed
GUEST, unregistred user!
关于数字值的定位。
在下拉框combobox中有如下一些值:
0123
0234
0345
1234
1345
1456
2456
2345
2567
如何实现检索,比如输入2直接定位到2456。


 
用循环,如果都是数字就好办了,像你这样长度固字就更好办了:直接找第一个大于2000的数,
得到INDEX后赋值给ComboBox的ITEMINDEX就行了.
 
好像记的用sendmessage这个函数可以实现具体怎么做记不清啦
 
autocomplete:=true
autodropdown =true 直接下拉到那个
false 直接显示那个不下拉
 
谢谢thinknet,但有没有更简单的方法。

sendmessage可以实现吗
 
procedure TForm1.Edit1Change(Sender: TObject);
var
i,x:integer;
begin
for i:=0 to comboBox1.Items.count-1 do
if pos(trim(Edit1.text),copy(combobox1.items,1,length(trim(Edit1.text))))>0 then begin
comboBox1.text:=comboBox1.Items;
break;
end
else
comboBox1.text:='';
end;
 
你用的是DELPHI哪个版本呀?,D6的COMBOBOX好象可以直接实现你的想法,试过吗?
 
顶部