各位老大,问你一个问题好吗?
就是那个combobox控件,如果我们要添加新数据时,在combobox中输入,当我们输入第一个字时(不管是英文还是中文),combobox将会出现自动下拉表出现的数据第一个字和刚才输入的字一样 
写好了帮我发到我的email上好吗?[email protected]
或者发到我QQ上22772842,谢谢了

解决方案 »

  1.   

    其实实现起来很简单,只要写个OnChange事件就可以了procedure TForm1.ComboBox1Change(Sender: TObject);
    var
      i : integer;
    begin
      for i:=0 to ComboBox1.Items.Count-1 do
        if Copy(ComboBox1.Items[i],0,Length(ComboBox1.Text))=ComboBox1.Text then
        begin
          ComboBox1.Text:=ComboBox1.Items[i];
          exit;
        end;
    end;
      

  2.   

    up master_jt(master) ( )
      

  3.   

    master_jt(master) :谢谢你的指点,可是我照你这样做不能实现像输IE地址的那个功能啊!是不是要有什么东西要改呢?请指教在下先谢了。
      

  4.   

    不要啊,这个不是回答过了吗?
    只要设置
    ComboBox.AutoComplete := True;就可以了吗?你用一楼那个肯定是不行的啦,你想过了没有E文和汉字的问题?
      

  5.   

    AutoDropDown := True;都设置一下吧;
      

  6.   

    唉!上面的几次大哥,我很感谢你们的指点,可是都无法实现我要的功能,是不是不明白我说的意思呢?我想要combobox功能是像IE上的网址栏那样输入第一个字母相应的的地网址(第一个字母相同的)就会显示出来啊!
      

  7.   

    楼主说的是WEB显示还是象WINDOWS运行一样的功能?
      

  8.   

    我问的也糊涂
    是根据用户输入补全呢?还是只是显示,由用户来选择?如果只是后者,一个COMBOBOX怕不够用吧,菜鸟的看法。高人指点
    好像还是不清楚。
      

  9.   

    把ComboBox的AutoDropDown属性设置成True.
      

  10.   

    AutoDropDown属性设置成True是可以的。帮你up
      

  11.   

    1.如果ComboBox中的内容不能更改则:
    cb_QueryItem --> TCombobox
        cb_QueryItem.Items.Clear;
        Str := 'Test';
        cb_QueryItem.Items.Add(str);
        // dbgrid name
        str := 'Name';
        cb_QueryItem.Items.Add(str);
        // dbgrid sex
        str := 'Sex';
        cb_QueryItem.Items.Add(str);
        // init cb_queryItem status
        cb_QueryItem.Style := csDropDownList;
        // locate
        cb_QueryItem.ItemIndex := 0;
    2.如果想输入内容:
        cb_QueryItem.AutoComplete := True;
        cb_QueryItem.AutoDropDown := True;