做搜索文件时碰到的问题_______在线等待,高分相送

Question

我想实现一个和WINDOWS文件搜索时界面相同的程序,可对于搜索时的那个"搜索范围"下拉框不知怎么做?我用DELPHI里的SHELLCOMBOBOX控件,可里面没有"浏览"这一项,不知各位有没有知道的?谢谢

Answer 1

在OnChange事件
if (combobox.text = '浏览') then
{
   一个选择搜索范围的窗体.showmodal;
}

Answer 2

恐怕要自己写这个控件,继承SHELLCOMBOBOX,在后面加两个treenode

Answer 3

1.把SHELLCOMBOBOX Root属性改为rfMyComputer
2.在窗体创建或显示时加入代码：
   ShellComboBox1.Items.Append('浏览...'); 
3.在SHELLCOMBOBOX onchange事件中
  with ShellComboBox1 do 
  begin
      if ItemIndex=Items.Count-1 then
      begin
        .....
        创建你的选择窗体。
        ......
      end;
      ItemIndex:=0;
  end;//delphi6 win2000下测试通过

Answer 4

to： happyzsl(学习) 
1.SHELLCOMBOBOX 中没有‘浏览’项。所以要自行加入
2.自行加入后，如按你写的那样不将SHELLCOMBOBOX 的索引置会原有项，将会出错