Delphi ListBox模拟百度搜索下拉框提示效果.rar

Delphi模拟百度下拉框搜索提示效果，带提示效果 的ListBox下拉框，如测试运行效果所示，光标锁定的地方，若用户需要输入，则会自动下拉匹配输入的内容，程序可能还需要诸多改进，这只是一个雏形。如果你对Delphi中的ListBox控件用法不熟悉，那么本示例会是一个很不错的用法范例，在代码部分，还演示了结合数据库来读取数据交显示到ListBox中的方法。一些ListBox用法代码： 　　if ListBox.ItemIndex>-1 then 　　 TEdit(Sender).Text:=ListBox.Items[ListBox.ItemIndex]; 　　ListBox.Visible :=False; 　　TEdit(Sender).SelStart:=Length(TEdit(Sender).Text); 　　exit;