Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

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

Search the Archive

Re: Re: Re: closing notebook cells

  • To: mathgroup at smc.vnet.net
  • Subject: [mg51900] Re: [mg51844] Re: [mg51798] Re: [mg51762] closing notebook cells
  • From: DrBob <drbob at bigfoot.com>
  • Date: Thu, 4 Nov 2004 01:51:01 -0500 (EST)
  • References: <200411030625.BAA08383@smc.vnet.net>
  • Reply-to: drbob at bigfoot.com
  • Sender: owner-wri-mathgroup at wolfram.com

I think, according to WRI's way of thinking, you're just being NOSY.

Stop that!

Bobby

On Wed, 3 Nov 2004 01:25:32 -0500 (EST), Ingolf Dahl <ingolf.dahl at telia.com> wrote:

>
>
> CellInformation[] - that sounds wonderful. But I have searched in help, the
> Wolfram site and Google, and also entered
> ??CellInformation, and I do not find any information anywhere! Please
> inform, how do I use it?
>
> Ingolf Dahl
> Sweden
>
>> -----Original Message-----
>> From: John Fultz [mailto:jfultz at wolfram.com]
To: mathgroup at smc.vnet.net
> To: mathgroup at smc.vnet.net
>> Sent: Tuesday, November 02, 2004 08:06
>> To: mathgroup at smc.vnet.net
>> Subject: [mg51900] [mg51844] [mg51798] Re: [mg51762] closing notebook cells
>>
>>
>> On Mon, 1 Nov 2004 02:52:43 -0500 (EST), Barthelet, Luc wrote:
>>> As I learned in mathgroup a few years ago I am using the following code
>>>
>>> to close automatically my graphics groups.
>>>
>>> CloseAnim[]:=(SelectionMove[EvaluationNotebook[],All,GeneratedCell];
>>> FrontEndTokenExecute["OpenCloseGroup"];);
>>> CloseAnim::usage = "CloseAnim[]";
>>>
>>> For example:
>>>
>>> Table[Show[Graphics[
>>> {Hue[Random[] ],Rectangle[{0,0},{1,1}]
>>> }]],{3}];
>>> CloseAnim[];
>>>
>>> The problem is that when I only generate a single cell "OpenCloseGroup"
>>> will generate a beep.
>>>
>>> Any idea on how to prevent that beep or test if GeneratedCell selected a
>>> single or several cells?
>>>
>>> Thanks
>>>
>>> Luc
>>
>> LinkWrite[$ParentLink, CellInformation[EvaluationNotebook[]]];
>> Length[LinkRead[$ParentLink]]
>>
>> If the length is greater than 1, then you can use the OpenCloseGroup token.
>>
>> CellInformation[] is new to version 5 and is, in general, a very good way
>> to test various properties of the selection without having to do a
>> NotebookRead[] (which could get very expensive if you have a selection
>> which consumes a lot of memory).
>>
>> Sincerely,
>>
>> John Fultz
>> jfultz at wolfram.com
>> User Interface Group
>> Wolfram Research, Inc.
>>
>>
>
>
>
>
>



-- 
DrBob at bigfoot.com
www.eclecticdreams.net


  • Prev by Date: Re: covariance, eigenvalues
  • Next by Date: Re: Re: Hypergeometric functions and Sum error in 5.01?
  • Previous by thread: Re: Re: closing notebook cells
  • Next by thread: Re: Re: closing notebook cells