TREEVIEW树控件的用法(100)

我在窗口的左边放了一个树按件，右边放了一个Qmaster数据窗口，当我加入右边数据的客户到左边的树控件后，但右边的数据也随着滚动，请如何解决？THANKS！代码： VAR PP:^STRING;PP1:^STRING; qmaster.close; qmaster.open; tv.items.clear; pp1:=allocmem(10); pp1^:=''; nownode:= tv.Items.addchildobject(nil,'ALL',pp1); qmaster.first; while (not qmaster.eof) do begin pp:=allocmem(10); pp^:= qmaster.fieldbyname('custid').asstring; tv.Items.addchildobject(nownode, qmaster.FieldByName ('custname').asstring,pp); qmaster.next; while qmaster.fieldbyname('custid').asstring=pp^ do begin qmaster.next; if qmaster.eof then exit; end; end; forderbox_sele.Free;

用 TDataset的 DisableControls 和 EnabledControls...... [red]qmaster.DisableControls;[/red] [blue]try[/blue] qmaster.first; while (not qmaster.eof) do begin pp:=allocmem(10); pp^:= qmaster.fieldbyname('custid').asstring; tv.Items.addchildobject(nownode, qmaster.FieldByName ('custname').asstring,pp); qmaster.next; while qmaster.fieldbyname('custid').asstring=pp^ do begin qmaster.next; if qmaster.eof then exit; end; end; [blue]finally[/blue] [red]qmaster.EnableControls;[/red] [blue]end; [/blue]

试过还是不行，请帮忙！