Hallo,
nun die beste Methode stammt von Theodore Gray
aus dem The Mathematica Jounal 7(3).
ShowStatus[status_] :=
LinkWrite[$ParentLink,
SetNotebookStatusLine[FrontEnd`EvaluationNotebook[],
ToString[status]]]
count = 0;
FixedPoint[(ShowStatus[count++]; Cos[#]) &, 0.5]
und modifiziert dei Status-Zeile des Notebooks, man will n"amlich nicht
wirklich den Iterations-Fortschritt im Notebook haben,
weder mit noch ohne Zeilenvorschub.
Gruss
Jens
Hans.Dolhaine@XXXXXXX.com wrote:
>
> Liebe Teilnehmer an der Liste,
>
> ich habe eine etwas länglicheren Iterationsprozess und lasse sowohl die
> Nummer der Iteration als auch ein Abbruchkriterium herausschreiben. Gibt
> es eine Möglichkeit, den Zeilenvorschub in Print zu unterdrücken? Mit
> anderen Worten, ich möchte die beiden Zahlen immer an die selbe Stelle des
> Bildschirms schreiben und damit vorhergehende Resultate überschreiben, um
> nicht nachher buchstäblich Tausend(e) von Output-Zellen löschen zu müssen.
>
> Mit freundlichen Grüssen
>
> Hans Dolhaine
> _________________________________
>
> VTR-TS
> Phone: +49-211-797-4809
> Fax: +49-211-798-1853
> Mobile: 0171 97 17 049
> E-Mail: Hans.Dolhaine@XXXXXXX.com