9687850865
* (all files)
* stripped svn header
* minor cleanups
; use following command to find out the history of files:
git log
git log --follow
git blame
git annotate
25 lines
300 B
Plaintext
25 lines
300 B
Plaintext
// Testing Browse()
|
|
|
|
#include "inkey.ch"
|
|
|
|
PROCEDURE Main()
|
|
|
|
LOCAL cColor := SetColor( "W+/B" )
|
|
|
|
#ifdef _SET_EVENTMASK
|
|
Set( _SET_EVENTMASK, INKEY_ALL )
|
|
MSetCursor( .T. )
|
|
#endif
|
|
|
|
Set( _SET_DATEFORMAT, "yyyy-mm-dd" )
|
|
|
|
CLS
|
|
|
|
USE test
|
|
Browse()
|
|
|
|
SetColor( cColor )
|
|
CLS
|
|
|
|
RETURN
|