🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: alt.lang.basic
Article #229

Re: How to get fast window print in VB/DOS?

#229
From: Peter G. Millard
Date: Tue, 10 Nov 1992 04:13
45 lines
1929 bytes
stevepo@microsoft.com (Steven Podradchik) writes:

>You should get approximately the same print rate when printing to a
>form via the Print method as printing to a standard DOS screen with the
>Print statement.  Could you post some of the code you're using?

>Thanks, Steve Podradchik (MS)

here is some sample code...the draw2 routine draws the number 2 on the 
screen using the h & v variables which specify it's starting position.
I am using the SUB LCATE to clean up the code write now. Might this be
slowing down the execution?

I pass the horizontal & vertical positions and what character to print.

draw2:
FOR t = 1 TO 5:
    lcate h + t, v, CHR$(205)
NEXT t
lcate h + 6, v, CHR$(187)
lcate h + 6, v + 1, CHR$(186)
lcate h + 6, v + 2, CHR$(188)
FOR t = 2 TO 5: lcate h + t, v + 2, CHR$(205): NEXT t
lcate h + 1, v + 2, CHR$(201)
lcate h + 1, v + 3, CHR$(186)
lcate h + 1, v + 4, CHR$(200)
FOR t = 2 TO 6:
    lcate h + t, v + 4, CHR$(205):
NEXT t:
RETURN

SUB lcate (x, y, x$)
Rdscrn.disp.CurrentX = x
Rdscrn.disp.CurrentY = y
Rdscrn.disp.PRINT x$
END SUB


Thanx for any additional info which anyone can provide.

-- 
******************************************************************************
	Peter G. Millard  *  INTERNET: v057n5um@ubvms.cc.buffalo.edu           
 	SUNY @ Buffalo    *          : millard@acsu.buffalo.edu
*****************************************************************************
Technical Details
Message-ID: <BxHFr0.4An@acsu.buffalo.edu>
Path: arc1-ca.pugleaf.net!sparky!uunet!zaphod.mps.ohio-state.edu!ub!acsu.buffalo.edu!millard
References: <BxDu9J.G2z@acsu.buffalo.edu> <1992Nov09.193601.19806@microsoft.com>

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!sparky!uunet!zaphod.mps.ohio-state.edu!ub!acsu.buffalo.edu!millard
From: millard@acsu.buffalo.edu (Peter G. Millard)
Newsgroups: alt.lang.basic
Subject: Re: How to get fast window print in VB/DOS?
Message-ID: <BxHFr0.4An@acsu.buffalo.edu>
Date: 10 Nov 92 04:13:47 GMT
References: <BxDu9J.G2z@acsu.buffalo.edu> <1992Nov09.193601.19806@microsoft.com>
Sender: nntp@acsu.buffalo.edu
Organization: UB
Lines: 45
Nntp-Posting-Host: autarch.acsu.buffalo.edu