MathGroup Archive 2007

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Progess bar in Mathematica


Hi,

SetNotebookStatus[status__] :=
   Module[{str},
     str=(# /. Except[_String,a_]:> ToString[a]) & /@ {status};
     str =StringJoin @@ str;
     LinkWrite[$ParentLink,
       SetNotebookStatusLine[FrontEnd`EvaluationNotebook[],
       str]]
    ]

Regards
   Jens

Dr. Wolfgang Hintze wrote:
> Is it possible to generate a kind of progess indicator in Mathematica?
> I could use Print[] but this scrolls the screen.
> 
> Im looking for something like 
> 
>     Application.StatusBar = "Please be patient..."
> 
> in Visual Basic for Applications for Excel.
> 
> Any hints are greatly appreciated.
> 
> Regards,
> Wolfgang
> 


  • Prev by Date: a problem about NDSolve and NIntegrate
  • Next by Date: ListPlot problem
  • Previous by thread: Re: Progess bar in Mathematica
  • Next by thread: Re: Progess bar in Mathematica