| Author |
Comment/Response |
Forum Moderator
email me
 |
 09/30/02 8:11pm
This is a bracket misplacement issue:
The styles of the cells that contain the
GraphicsData expressions are included in the
GraphicsData rather than the cell expresion, e.g.
Cell[GraphicsData["PostScript",DisplayString[p],"Graphics"]],
should be:
Cell[GraphicsData["PostScript",DisplayString[p]],"Graphics"],
and the NotebookPut espression can be:
NotebookPut[Notebook[
{
Cell["CALLS BY DEPARTMENT, 2002 year","Title",
Background\[Rule]RGBColor[1,0,0]],
Cell[TextData["PIE CHART"], "Subsection", FontColor \[Rule] Hue[0],
FontSize \[Rule] 20,
CellFrame \[Rule] True, Background \[Rule] GrayLevel[0.7],
ShowCellBracket \[Rule] True],
Cell[GraphicsData["PostScript",DisplayString[p]],"Graphics"],
Cell[TextData["BARCHART"], "Subsection", FontColor \[Rule] Hue[0],
FontSize \[Rule] 20,
CellFrame \[Rule] True, Background \[Rule] GrayLevel[0.7],
ShowCellBracket \[Rule] True],
Cell[GraphicsData["PostScript",DisplayString[bc]],"Graphics"],
Cell[TextData["FIXED AND NOT FIXED CALLS FOR:"], "Subsection",
FontColor \[Rule] Hue[0], FontSize \[Rule] 18],
Cell[BoxData[firstButton]],
Cell[BoxData[secondButton]],
Cell[BoxData[thirdButton]],
Cell[BoxData[forButton]],
Cell[BoxData[fifButton]]
}, WindowToolbars \[Rule] EditBar,
Background \[Rule] RGBColor[0.9726, 0.8711, 0.6640] ,
ButtonBoxOptions \[Rule] {ButtonData \[Rule] "foo"},
]
];
URL: , |
|
