Не получается считать данные из TreeNode.Помогите разобраться.

## Код:
```
MODULE StudyTree;

IMPORT   Dialog;

TYPE
   Tree* = RECORD tree*: Dialog.Tree END;
   Rec* = RECORD
      num*,
      info*: ARRAY 128 OF CHAR 
   END;
   PRec* = POINTER TO Rec;   
   
VAR
   tree*: Tree;
   node*: Dialog.TreeNode;
   rec*: Rec;
   prec: PRec;
   str*: Dialog.String;
   
PROCEDURE BuildTree;
VAR n: Dialog.TreeNode; 
BEGIN
      .......................
   n := tree.tree.NewChild(node, 0, str$);
   NEW(prec);
   prec.num := rec.num;
   prec.info := rec.info;   
   n.SetData(prec)
      .......................
END BuildTree;

PROCEDURE TreeNotifier*(op, from, to: INTEGER);
VAR n: Dialog.TreeNode; 
BEGIN
   IF op = Dialog.changed THEN
      n := tree.tree.Selected();
      IF n # NIL THEN 
         NEW(prec);
         prec := n.Data [X]; <- ????????
         ...............
      END;
   END;
   Dialog.Update(rec)
END TreeNotifier;

END StudyTree.
```
