MathGroup Archive 2010

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

Search the Archive

Re: Custom dialog during evaluation

  • To: mathgroup at smc.vnet.net
  • Subject: [mg111727] Re: Custom dialog during evaluation
  • From: Albert Retey <awnl at gmx-topmail.de>
  • Date: Wed, 11 Aug 2010 04:49:11 -0400 (EDT)
  • References: <i3r0n8$dgn$1@smc.vnet.net>

Hi,

> I would like to have a custom dialog appear while an evaluation is in
> progress (maybe even add that familiar spinning flower).  I know it is easy
> for an experienced user to see when Mathematica is working, but this would
> help novice users who use some of my notebooks.
> 
> Does anyone have suggestions on how to do this?  I can use CreateDialog, but
> how do I close the dialog when the evaluation is done?  DialogReturn only
> seems to work if it is contained in the dialog, and if the entire evaluation
> is contained in the CreateDialog, then the dialog doesn't appear until the
> evaluation is complete.
> 
> Any suggestions would be appreciated.

Something like this?

Button["Start Calculation",
 Module[{nb},
   nb = CreateDialog[
     Column[{"calculating ...",
       ProgressIndicator[Dynamic[Clock[Infinity]], Indeterminate]}]];
   Pause[3];(*here goes the lengthy calculation*)NotebookClose[nb]];,
 Method -> "Queued"]

hth,

albert


  • Prev by Date: Frontend option settings
  • Next by Date: Re: Clearing RAM Memory during evaluation
  • Previous by thread: Custom dialog during evaluation
  • Next by thread: Re: Custom dialog during evaluation