Hallo,
die Variante:
MyPrint[arg__] := Block[{$Output = OutputStream["stderr", 2]},
Print[arg]]
wird wohl eher nicht gefallen, was ist aber mit
MyPrint2[arg__] := Module[{ins = {arg}},
NotebookWrite[FrontEnd`MessagesNotebook[],
Cell[RowBox[ToBoxes /@ ins], "Print"]]
]
und
Block[{Print = MyPrint2},
Print[x, Pi, "Hallo"]]
??
Besonders r"ude Menschen w"urden hier Print=MyPrint2 global setzen.
Gruss
Jens
"Georg Ch. Mellau" wrote:
>
> Hallo,
>
> ich habe ein Problem :
>
> Ich moechte das ALLE Mathematica Print[...] Befehle in den
> Message Fenster landen. Die Methode
>
> SetOptions[mynotebook,
> PrintAction -> "PrintToConsole"];
>
> funktioniert nicht, meistens wird doch ins Notebook gedruckt.
>
> Gibt es hier überhaupt eine Loesung ?
>
> MfG
>
> Georg Mellau
|