Foxpro 2.6 running on Windows XP

The "Picture too big" type error has usually been related to compressed BMP images.  I suppose it could relate to something else that is similar, but that is the general area of interest that generates that type error.

in Windows XP you need to right click on My Computer and then choose Properties/Advances/Environment Variables

In the System Variables put:
FILES 100 or 150 or any number you feel that your program needs.

This is previously known was CONFIG.SYS

In Config.nt
put FILES=150
BUFFERS=100
and save it.

We had this problem even before XP with a full-screen (ZOOM WINDOW MAX) app that used a small bmp as the background filler (DEFINE WINDOW ... FILL FILE ...) on the login page. Took that out and no problems since.

FoxPro for Windows does not handle large bitmaps (pixels) or bitmaps with more than 16 colors very well. Try to avoid them as much as you can. If you wish to use a repetitive or tiling bitmap, use a 50x50 one.

The real answer re the I/O problem is to make sure you have a CD in the client's CD drive. The old foxpro embedded drive letters as part of the search path when the application gets compiled, and to remove them we use a small utility called fixapp (you're welcome to a copy). If that works you know its right.

The picture corruption is due to the flakey way foxpro handles graphic files - either get rid of them or reduce the colour depth and recompile the app or redistribute the new graphic files if they are "excluded" from the project.

HTH

I have around 200 small bitmaps for my FoxPro for Windows 2.6 application. They are 16 colors and are embedded in the application. Most of them are 23x23 and a few are 100x50 and a couple of backgrounds are 50x50. Very small and I still get this error. I trap it using ON ERROR and in the error handler I just issue a RETRY. If still occuring a lot I let the application wait a few seconds before retrying. This is how I handled it. Also FPW26 does not handle large bitmaps or bitmaps with a big color depth very well.

ON ERROR DO error WITH ERROR(), MESSAGE(), MESSAGE(1), PROGRAM(), PROGRAM(1), LINENO(), LINENO(1), ALIAS(), ORDER(), FILTER(), SET('RELATION'), WONTOP(), VARREAD(), SYS(0)


PROCEDURE error
PARAMETER m.error, m.message, m.message1, m.program, m.program1, m.line, m.line1, m.alias, m.order, m.filter, m.relation, m.window, m.varread, m.machine
PRIVATE m.error, m.message, m.message1, m.program, m.program1, m.line, m.line1, m.alias, m.order, m.filter, m.relation, m.window, m.varread, m.machine, onerror, m.action, m.quit, m.tip, m.returnprogram, m.lastprogram, m.plevel, m.sameerror, m.savearea
m.savearea = SELECT()
IF NOT USED('error')
      USE error IN 0
ENDIF
onerror = ON('ERROR')
INSERT INTO error;
            (date, time, user, error, message, message1, program, program1, line, line1, alias, order, filter, relation, window, varread, machine);
      VALUES;
            (DATE(), TIME(), m.gluserid, m.error, m.message, m.message1, m.program, m.program1, m.line, m.line1, m.alias, m.order, m.filter, m.relation, m.window, m.varread, m.machine)
ON ERROR &onerror
SELECT (m.savearea)
DO CASE
      CASE m.error = 108
            WAIT WINDOW "File is in use by another. Please wait ..." TIMEOUT 1
            RETRY
      CASE m.error = 1108 && Picture error
            RETRY
      CASE m.error = 1249
            m.lastprogram = ''
            m.returnprogram = ''
            FOR m.plevel = 32 TO 1 STEP -1
                  m.lastprogram = m.returnprogram
                  m.returnprogram = PROGRAM(m.plevel)
                  IF NOT EMPTY(m.lastprogram) AND m.lastprogram == m.program
                        EXIT
                  ENDIF
            ENDFOR
*            IF msgbox(m.message,m.glappname,5+16+256) = vbCancel
*                  DO logout
*                  ON SHUTDOWN
*                  QUIT
*            ENDIF
            = msgbox(m.message,m.glappname,16)
            RETURN TO &returnprogram
ENDCASE
= msgbox("This program has performed an illegal operation and will be shut down!" + CHR(13) + CHR(13) + m.message ,appname,16)
SELECT (m.savearea)

I am using a FOXPRO 2.6 for win in Windows 98. The said version of FOXPRO is not functioning in win2000 or win XP.
Always there is an error "Divided by Zero" or something else.
Please help me in this regard.
NAVEED AHMAD LODHI
notynaveed@walla.com