I have three plots in an OpenerView named "PopupWindow", "MouseOver" .
With[{z1 = .25, z2 = 1, x = 1},
a = Manipulate[PopupWindow[
Labeled[Graphics[
l = DiscretePlot[Sin[a t], {t, 0, 2 Pi, Pi/6},
ExtentSize -> Full, ImageSize -> Scaled[x],
AspectRatio -> z1/z2]], "PopupWindow Plot", Top,
LabelStyle ->
Directive[FontFamily -> "Helvetica",
FontSize -> Scaled[.02]]], {a}],
OpenerView[{"Vertical",
Column[{Control[{{a, 1, "a Manipulator"}, 1, 20}]}]}],
ControlPlacement -> Bottom]]; With[{z1 = .25, z2 = 1, x = 1},
b = Manipulate[
Mouseover[
Labeled[q =
Graphics[
DiscretePlot[Sin[g t], {t, 0, 2 Pi, Pi/6}, ExtentSize -> Full,
PlotStyle -> Orange, AspectRatio -> z1/z2,
ImageSize -> Scaled[x], ImageMargins -> 0,
ImagePadding -> 0]], "MouseOver Plot", Top,
LabelStyle ->
Directive[FontFamily -> "Helvetica", FontSize -> Scaled[.02]]],
Labeled[
Graphics[
Plot[Sin[h k], {k, 0, 2 Pi}, PlotStyle -> Pink,
Filling -> Axis, FillingStyle -> Pink, ImageSize -> Scaled[x],
AspectRatio -> z1/z2, ImageSize -> {200}, ImageMargins -> 0,
ImagePadding -> 0]], "MouseOver Plot", Top,
LabelStyle ->
Directive[FontFamily -> "Helvetica",
FontSize -> Scaled[.02]]]] OpenerView[{"Vertical",
Column[{Control[{{g, 1, "g Manipulator"}, 1, 20}],
Control[{{h, 0, "h Manipulator"}, 0, 10}]}]}],
ControlPlacement -> Bottom]]
Grid[{{PopupMenu[
Dynamic[p], {a ->
Labeled[l, "PopupWindow Plot", {Right},
LabelStyle -> Directive[Bold, FontFamily -> "Helvetica"]],
b -> Labeled[q, "MouseOver Plot", {Right},
LabelStyle -> Directive[Bold, FontFamily -> "Helvetica"]]},
FieldSize -> {20, 6}, ImageMargins -> 0, FrameMargins -> 0,
ContentPadding -> False,
Alignment -> {Center, Center}]}, {Dynamic[p]}}, Spacings -> 20,
Alignment -> {Left, Top}]
I am facing some problems with it.
When I select "MouseOver Plot", it is aligned very much to the left in
Popupmenu. I wanted all the plots to be aligned in one order.When I click on "PopupMenu", the image size of PopupWindow plot is less than the other plot. How can I rectify this?
l PopupWindow Plotandq MouseOver Plotbut no actual plot appears in the Popup menu. I assume that is what you wanted. – Matariki Jul 14 '12 at 7:14