Source position: outline.inc line 36
type Tnode = record
next: Pnode;
text: UnicodeString;
childlist: Pnode;
expanded: Boolean;
end;