head	1.3;
access;
symbols;
locks;
comment	@# @;


1.3
date	2001.11.11.11.50.30;	author Helios;	state Exp;
branches;
next	1.2;

1.2
date	2001.11.11.11.41.17;	author Helios;	state Exp;
branches;
next	1.1;

1.1
date	2001.11.05.15.00.19;	author Helios;	state Exp;
branches;
next	;


desc
@Snapshot all open windows
@


1.3
log
@- renamed from »SnapshotAll.rexx« to »SnapshotWindows.rexx«.
@
text
@/* $VER: SnapshotWindows.rexx 1.2 (11.11.2001) (W) by Martin Steigerwald
   $Id: SnapshotAll.rexx 1.2 2001/11/11 11:41:17 Helios Exp $
*/

ADDRESS Workbench
OPTIONS RESULTS


LOCKGUI
GETATTR OBJECT WINDOWS STEM windowlist

DO i=0 TO windowlist.count-1
    IF windowlist.i ~== "root" THEN DO
        WINDOW WINDOWS '"'windowlist.i'"' SNAPSHOT
    END
END

UNLOCKGUI
@


1.2
log
@- now locks GUI during operation.
@
text
@d1 2
a2 2
/* $VER: SnapshotAll.rexx 1.2 (11.11.2001) (W) by Martin Steigerwald
   $Id: SnapshotAll.rexx 1.1 2001/11/05 15:00:19 Helios Exp $
d7 1
@


1.1
log
@Initial revision
@
text
@d1 2
a2 2
/* $VER: SnapshotAll.rexx 1.1 (5.11.2001) (W) by Martin Steigerwald
   $Id$
d8 1
d17 1
@