资源说明: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;
本源码包内暂不包含可直接显示的源代码文件,请下载源码包。