[R] tcltk again (solved)

[Richard Müller]

> I wrote the following code:
> X11()
> # some code to generate a plot on the screen omitted
>
> res <-    tkmessageBox(title="Finish?",
>       message="save as PDF?",
>       icon="question", type="okcancel")
>
> if (tclvalue(res) == "ok")
>     Datei <- tkgetSaveFile(initialdir="temp/",defaultextension=".pdf",
>     initialfile="Haupt_Chl_Phaeo.pdf")
>     dev.copy(pdf, tclvalue(Datei))
> else graphics.off()
> graphics.off()
>
> In the moment I'm saving I dont have the pdf generated yet. 

That's wrong. It works perfectly. Thanks to all contributors. Happy New Year!
 Greetings
 Richard

-- 
Richard Müller - Am Spring 9 - D-58802 Balve-Eisborn
www.oeko-sorpe.de