Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'Export DynamicModule' topicStudent Support Forum > General > Archives > "Export DynamicModule"

Next Comment >Help | Reply To Topic
Author Comment/Response
Christian
07/31/12 10:33am

Hi,

I wrote a piece of code to enable me to mark 2 positions in an image with the help of Markers (Locators). With their positions i can calculate the slope/angle between them.

I like to export the image including the markers as i positioned them.

I tried to use export, but this exports only the default value / view, as they were created.

Code:

you can substitute horPopl and vertPopl with any kind of image data

EmissionData =
GraphicsGrid[{{DynamicModule[{pos1 = {1, 1}, pos2 = {-1, -1}},
Show[
horPopl,
Graphics[
Dynamic[Text[
ToString[
Round[ ArcTan[1 / Divide @@ (pos1 - pos2)]/Degree,
0.1]], {0, 0}]]],
Graphics[Locator[Dynamic[pos1]]],
Graphics[Locator[Dynamic[pos2]]]
]
],
DynamicModule[{pos3 = {1, 1} , pos4 = {-1, -1} },
Show[
vertPopl,
Graphics[
Dynamic[Text[
ToString[
Round[ArcTan[1 / Divide @@ (pos4 - pos3)]/Degree,
0.1]], {0, 0}]]],
Graphics[Locator[Dynamic[pos3]]],
Graphics[Locator[Dynamic[pos4]]]
]
]}}, ImageSize -> 800
];

URL: ,

Subject (listing for 'Export DynamicModule')
Author Date Posted
Export DynamicModule Christian 07/31/12 10:33am
Re: Export DynamicModule Michael 08/01/12 4:12pm
Next Comment >Help | Reply To Topic