blob: 4d0fee783787b3238b1d761310fd0ee58f513fd0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
-- File: PDataStd_TreeNode.cdl
-- Created: Thu Jun 17 10:56:43 1999
-- Author: Vladislav ROMASHKO
-- <vro@flox.nnov.matra-dtv.fr>
---Copyright: Matra Datavision 1999
class TreeNode from PDataStd inherits Attribute from PDF
uses
Attribute from PDF,
GUID from Standard
is
Create returns mutable TreeNode from PDataStd;
First(me) returns TreeNode from PDataStd;
SetFirst(me : mutable; F : TreeNode from PDataStd);
Next(me) returns TreeNode from PDataStd;
SetNext(me : mutable; F : TreeNode from PDataStd);
SetTreeID(me : mutable; GUID : GUID from Standard);
GetTreeID(me) returns GUID from Standard;
fields
myFirst : TreeNode from PDataStd;
myNext : TreeNode from PDataStd;
myTreeID : GUID from Standard;
end TreeNode;
|