barrett@ektools.UUCP (Chris Barrett) (01/24/89)
Help! I'd like to use the ARP file requester from basic, but it keeps guruing the machine. The following is a short code example: DIM FR&(10) DECLARE FUNCTION FileRequest&() LIBRARY LIBRARY "graphics.library" LIBRARY "arp.library" TEMP$ = "Enter file name: " + CHR$(0) FOR TEMP = 1 TO 10 FR&(TEMP) = 0& NEXT TEMP FILENAME$ = STRING$(128,0) DIR$ = STRING$(128,0) FR&(1) = SADD(TEMP$) FR&(2) = SADD(FILENAME$) FR&(3) = SADD(DIR$) TEMP = FileRequest& (VARPTR(FR&(0))) IF TEMP <> 0 THEN MN$ = DIR$ + FILENAME$ ELSE MN$ = "" END IF PRINT MN$ LIBRARY CLOSE END It does display the requester for about .5 seconds then crashes, any suggetions would be appreciated. Thanks. Chris rochester!kodak!ektools!barrett barrrett@ektools