Dec 102017
 
Simple dBase routine that will turn the cursor on and off.
File DB4CUR.ZIP from The Programmer’s Corner in
Category Dbase Source Code
Simple dBase routine that will turn the cursor on and off.
File Name File Size Zip Size Zip Type
CURSOR.BIN 128 51 deflated
CURSOR.DOC 1226 592 deflated

Download File DB4CUR.ZIP Here

Contents of the CURSOR.DOC file


* Here is some sample code that exercises the Cusor.bin module.
* Just to clarify a few points. This module cannot be tested at the
* dot prompt. dBASE IV simply turns the cursor back ON after the call has
* been executed which was an intentional change from dBASE III+ (although
* not necessarily a desirable one). It does work in the context of a program.
* 06/12/89 RVW
*

* CURSTEST.PRG
* Test cursor.bin under INKEY() and Procedure invocation.
* 06/12/89 RVW
*
SET TALK OFF
CLEAR
LOAD Cursor.bin
@ 5,10 SAY "Testing (cursor should be ON)"
WAIT
CALL cursor WITH "OFF"
@ 7,10 SAY "Testing (cursor should be OFF)"
@ 8,0 SAY "INKEY() TEST... Press any key to continue."
DO WHILE INKEY()=0
ENDDO
CLEAR
@ 1,0 SAY "Testing cursor during called module execution."
DO CURSTES2
CALL Cursor WITH "ON"
@ 15,10 SAY "Testing (cursor should be ON)"
WAIT
RELEASE MODULE Cursor
SET TALK ON
RETURN

* CURSTES2.PRG
* Module called by CURSTEST.PRG to check cursor.bin during a called
* procedure.
* 06/12/89 RVW
*
@ 5,10 SAY "CALLED PROGRAM: CURSTEST.PRG ...cursor should still be OFF."
WAIT
@ 5,10
@ 5,10 SAY "Executing INKEY()... Press any key to continue."
DO WHILE INKEY()=0
ENDDO
RETURN


 December 10, 2017  Add comments

Leave a Reply