'Can't get an error from CONSOLE SET SCREEN with XP SP3
'Also, if system starts in FULL SCREEN may need to get to window mode
'The easiest way I've found is to SHELL "DOSBOX.EXE /WINDOW" 'Perfect Sync
' I've probably reported this before, but cannot find it.
'
'Also, if system starts in FULL SCREEN may need to get to window mode
'The easiest way I've found is to SHELL "DOSBOX.EXE /WINDOW" 'Perfect Sync
' I've probably reported this before, but cannot find it.
'
Code:
#COMPILE EXE #DIM ALL FUNCTION PBMAIN () AS LONG 'The problem here is that the buffer size must be as large as size or get scroll bars LOCAL r&,c AS LONG 'rows and columns wanted LOCAL rr,cc AS LONG 'after CONSOLE GET SCREEN LOCAL counter AS LONG REM SHELL "DOSBOX.EXE /WINDOW" 'another matter r = 30 'request rows c = 71 'request columns SLEEP 250 CONSOLE SET SCREEN r, c SLEEP 250 IF ERR THEN ? "CONSOLE SET SCREEN never showed an error, until now! (XP SP3)";ERRCLEAR WAITKEY$ EXIT FUNCTION END IF SLEEP 1000 CONSOLE GET SCREEN TO rr&, cc& SLEEP 1000 PRINT " r"," c"," rr"," cc" ? r,c,rr,cc IF r <> rr OR c <> cc THEN BEEP ? "Failed, but no error reported. ? "Press any key to end program" WAITKEY$ EXIT FUNCTION ELSE ? "Success, you may continue" WAITKEY$ FOR counter = 1 TO r -1 ? "Row"r NEXT ? "Row";r END IF WAITKEY$ END FUNCTION
Comment