f47afe53 |
1 | # OCAF VISUALIZATION |
2 | # Presentation attributes |
3 | # |
4 | # Testing attributes: TPrsStd_AISPresentation & TDataXtd_Presentation |
5 | # |
6 | # Testing command: standard set of commands |
7 | # |
8 | # The test checks joint work of these attributes (including Undo/Redo) and keeps result in 'bug26290_new_1.cbf' file |
9 | |
7a1b96cb |
10 | pload OCAF VISUALIZATION |
f47afe53 |
11 | |
12 | box b 100 200 300 |
13 | NewDocument D BinOcaf |
14 | UndoLimit D 100 |
15 | NewCommand D |
16 | set Lab1 [Label D 0:1:1] |
17 | SetShape D $Lab1 b |
18 | AISInitViewer D |
19 | vsetdispmode 1 |
20 | AISSet D $Lab1 NS |
21 | AISDisplay D $Lab1 |
22 | vfit |
23 | NewCommand D |
24 | Undo D 1 |
25 | Redo D 1 |
26 | AISColor D $Lab1 11 |
27 | NewCommand D |
28 | SaveAs D $imagedir/bug26290_new_1.cbf |
29 | |
30 | AISErase D $Lab1 |
31 | ## DFBrowse D # - for debug purpose only |
32 | AISUnset D $Lab1 |
33 | NewCommand D |
34 | Undo D 1 |
35 | Redo D 1 |
36 | Close D |
37 | |
38 | ## reopen just kept file |
39 | Open $imagedir/bug26290_new_1.cbf D |
40 | |
41 | ## DFBrowse D |
42 | AISInitViewer D |
43 | vsetdispmode 1 |
44 | vfit |
45 | AISColor D $Lab1 9 |
46 | AISErase D $Lab1 |
47 | Close D |