请教：这样的ComboBox如何实现，帮忙啊，UP有分

Question

我要实现类似ie浏览器的地址栏的ComboBox，在ie浏览器的地址栏中，当你输入一串字符时，下拉列表会列出所有历史记录中存放的地址前几位字符和输入字符相符的条目.

Answer 1

在Delphi中，输一个控件名和一个“。”后，就会弹出一个相应的属性方法列表框，这个时候，可以手工输入也可以选择，输入的时候还有自动检索功能，请问这种功能怎么实现

Answer 2

在 ComboBoxChange里写代码就可以了.动态的刷新列表值.

Answer 3

有第三方控件TcxMRUEdit可以实现你的要求

Answer 4

关注！
但同意 bcghb() ！

Answer 5

procedure TFrmMain.ComboBox1Change(Sender: TObject);
begin
  if rightstr(combobox1.Text,1)='.' then
    begin
      application.MessageBox('','',mb_ok);
    end;
end;

Answer 6

poleax() :
    你说的那个控件是一个独立的控件还是？我搜了一下，有一个是要699.99美元的，你说的不会是那个吧？

Answer 7

我用tstrings 为 str 存放一字符列表
   如：a
       ab
       abc
       b
       bb
   再用一combobox  中输入'a'的话  就把 str 列表中带有a字符的数据全部加入到combobox中

Answer 8

我作了一个类似的，留下你的email。
我不要699.99美元，有699.99分就可以了。哈哈……

Answer 9

那是一个控件包里的，www.51delphi.com里有下

Answer 10

我要一份，我有分但没人民币，因俺太穷了
[email protected]

Answer 11

poleax  什么包呀，给个下载  谢谢

Answer 12

poleax() :
    控件包叫什么名字啊？我搜不到啊

Answer 13

fengjn(小枫) :
     ,谢谢
 
 有用的话我一定给你多多的分~~~

Answer 14

自己在onchange,之類中處理就可,加個查詢

Answer 15

那个包是DevExpress QuantumGrid 4.5 ，据我所知只有51Delphi可以免费下载

Answer 16

在 ComboBoxChange里写代码就可以了.动态的刷新列表值.

Answer 17

调用系统COM接口实现,先点Button1 然后在Edit中输入如有匹配的会自动显示。
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls,shdocvw,ShlIntf, ActiveX, ComObj, StrTools;type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);   
  private
    { Private declarations }
    FAutoComplete: IAutoComplete2;
    FStrings: IUnknown;
    FAutoCompleteStrings:TStringList;
  //  FRunAutoComplete:Boolean;
  public
    { Public declarations }
  end;var
  Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);
var
  i:integer;
begin
  FAutoCompleteStrings :=TStringList .Create ;
  for i:=1 to 10 do
  FAutoCompleteStrings .Add(IntToStr(i));  FAutoComplete  := CreateComObject(CLSID_AutoComplete) as IAutoComplete2;
  FStrings := TEnumString.Create(FAutoCompleteStrings) as IUnknown;
  OleCheck(FAutoComplete.SetOptions(ACO_AUTOSUGGEST or ACO_UPDOWNKEYDROPSLIST));
  OleCheck(FAutoComplete.Init(Edit1.Handle,FStrings,nil,nil));end;
end.

Answer 18

在text change的时候发一个消息让list dropdown 再让你模糊查询到的那个选项选中！

Answer 19

to  ZyxIp(绝望中...) :  IAutoComplete2  在哪儿？