Screen printing Arev 2.1 screens on a Windows NT 4.0 Workstation (AREV Specific) [Revelation On-Line Wiki]

Sign up on the Revelation Software website to have access to the most current content, and to be able to ask questions and get answers from the Revelation community

At 24 SEP 1998 08:12:40PM Peter Darlington (mailto:peter@tdc.govt.nz) wrote:

AREV Specific

Hi everyone

Hope this topic hasn't been covered before, I couldn't see it in the faq.

We have an Arev 2.1 database sitting on a Windows NT 4.0 Server (Sp3) with the NT Revelation Service running. We can't get printscreen to work on NT 4.0 Workstations. On our Windows 95 PC's the "shift+Printscrn" command works fine but not on NT W/s. I realize this may be an NT W/s related question rather than an Arev one but would appreciate any ideas that anyone has.

Cheers, Peter

At 25 SEP 1998 04:32AM Jonathan Bird (jb@psiltd.co.nz) wrote:

Indeed it is not an Arev issue. However, try

which will cut the active window into the clipboard, which you can the copy into paintbrush or a WP peogramme and print (even in glorious colour)

JB,

Christchurch.

At 25 SEP 1998 08:57AM Aaron Kaplan wrote:

On the MISC tab of the shortcut, any command you want processed as in DOS should be unchecked. Otherwise, default windows processing will occur.

akaplan@sprezzatura.com

Sprezzatura, Inc.

At 25 SEP 1998 05:24PM Steve Smith wrote:

Download a copy of PC Magazine's free utility PRINTNOW or use this RBASIC program from a macro:

SUBROUTINE SCREEN.DUMP

* By S. Smith, 1992. This is a quick & dirty utility !!!

* Invoked from a hotkey/macro - will create a dos file with

* the contents of the screen. For creating documentation, etc.

DECLARE SUBROUTINE MSG, VIDEO.RW

* this common block entry retains the dos filename

* between screen dumps

COMMON /VIDEO/ DOS.FILENAME

* provide default dos filename if none yet specified

IF DOS.FILENAME=' THEN
DOS.FILENAME=SCREEN.DMP'
END

* capture screen buffer contents

IMAGE='

VIDEO.RW(0,0,(@CRTWIDE-1),(@CRTHIGH-1),'R',IMAGE)

* Allow user to modify filename

MSG('Enter filename to write to:','RC',DOS.FILENAME,DOS.FILENAME)

* do nothing if user escapes/omits filename

IF DOS.FILENAME=' THEN RETURN

* get dos output file size

OFFSET=DIR(DOS.FILENAME)

* if file already exists let user (a) overwrite existing file

* or (b) append this dump to existing file

IF OFFSET ] 0 THEN
REPLY=A'
TXT1=File ':DOS.FILENAME:' already exists!'
TXT1=Overwrite/Append ? (O/A)"
MSG(TXT1,'RC',REPLY,REPLY)
user hit escape, so abort
IF REPLY=' THEN RETURN
END

* if overwrite then start at byte 0

IF REPLY=O' THEN
OFFSET=0
END

* if starting at byte 0 create 0 byte file

IF OFFSET < 1 THEN
OSWRITE '' TO DOS.FILENAME
END

* take original image and insert carriage-return line feeds

NEW.IMAGE='

FOR I=1 TO LEN(IMAGE) STEP 2

NEW.IMAGE := IMAGEI,1

IF MOD(I+1,160)=0 THEN
NEW.IMAGE := \0D0A\
END

NEXT I

* add page break to end of dump, so that each screen has its own page

NEW.IMAGE := CHAR(12)

* write image to file

OSOPEN DOS.FILENAME TO OS.FILE THEN
OSBWRITE NEW.IMAGE TO OS.FILE AT OFFSET
END ELSE
MSG('Error - cannot open ':DOS.FILENAME,'','','')
END

View this thread on the forum...