再加200分，嘻嘻。。来拿吧

Question

to Kingron(ＷｉｎＡＰＩ):
   谢谢你的帮助,上次是如何刷新当前的webbroser,这次是想问如何能够按一button就会将所有自动生成的TabSheet和Webbrowser全部删除掉,该如何做?!
   回复再加分.

Answer 1

呵呵，不好意思，没有看题目，我稍微看了一下，以为是给上次加的分！因为你说要给200分的。
全部删除也很容易！呵呵，小心破产哦！总共400分！！！！！！！
procedure TForm1.Button2Click(Sender: TObject);
var
  i:integer;
  j:integer;
begin
  for i:=PageControl1.PageCount-1 downto 0 do
  begin
    for j:=PageControl1.Pages[i].ControlCount-1 downto 0 do
    begin
      PageControl1.Pages[i].Controls[j].Free;
    end;
    PageControl1.Pages[i].Free;
  end;
end;

Answer 2

to Kingron(ＷｉｎＡＰＩ):
   如果你给我解答了以下两个问题，马上给你补上400分！！！
   1。我想建立一个物料管理系统,在该系统中有一功能模块是管理物料编码,在该模块中,我需要使用TreeView和ListView两个控件,TreeView用来显示物料类别的父子关系,ListView用来显示所属在TreeView中选种的物料类别的物料明细记录,这样的功能该如何实现呢?
       
      物料类别显示如下:
       
      ---物料-----皮
              |
              |---五金                   当选择锁时,将在ListView显示属于该锁的明细,如,狗扣,挂扣
              | |                        等.....
              | |--锁
              | |
              | |--扣           .....
      我建立了两个库,一个用于存储物料类别数据,一个用于存储物料明细数据..
物料类别库数据内容如下:
    类编码    类名称
    00101     皮
    00102     五金
    0010201   扣
    0010202   锁
    .......物料明细库内容如下:
    类编码    物料编号   物料名称
    0010201   01        狗扣  
    0010201   02        挂扣
    0010202   01        大号锁
    0010202   02        小号锁
    我需要的是只有商品类别信息挂到树上，比如父类，子类...，而属于类的商品表则不需要挂到树中，但是当我在TreeView中点中某类时，能够在商品库中将属于该类的商品筛选出显示在ListView中，如果象树的每一节点的信息内容是由编码+‘ ’+具体类名称组成的话，将很容易根据该节点信息得到编码，并从商品库中筛选出属于该类别编码的商品显示在ListView中，但是这样有一个缺点，节点信息内容都由编码+‘ ’+具体类名称组成，这样在给人的视觉上不是很美观，尤其是当类别的级数越多的时候，显示的编码越长，我现在的要求是：    如何不将类编码显示在树节点上，树节点只显示类名称，仍然能够但在TreeView中点击该节点时，能够从商品库中筛选出属于该类别编码的商品显示在ListView中，我该如何做的到呢？