ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/Tools/MetaEditor.pas
(Generate patch)

Comparing oup/current/Tools/MetaEditor.pas (file contents):
Revision 243 by alloc, Fri Aug 10 17:26:03 2007 UTC vs.
Revision 244 by alloc, Fri Aug 17 21:09:51 2007 UTC

# Line 100 | Line 100 | var
100    i: Integer;
101    data: TNodeData;
102    node: PVirtualNode;
103 +  basenode: PVirtualNode;
104   begin
105    if FConnectionID <> TreeElem.ConnectionID then
106      SelectConnection(TreeElem.ConnectionID);
107    root := TreeElem;
108    VST.Clear;
109    VST.BeginUpdate;
110 +  data.Field := root;
111 +  basenode := AddVSTEntry(VST, nil, data);
112    for i := 0 to root.ChildCount - 1 do
113    begin
114      data.Field := root.Child[i];
115 <    node := AddVSTEntry(VST, nil, data);
115 >    node := AddVSTEntry(VST, basenode, data);
116      if data.Field.ChildCount > 0 then
117        VST.HasChildren[node] := True;
118    end;

Diff Legend

– Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)