Partager via

This code queries the foxuser resource file. What does it do?

  • Article

#if 0

What does the code below do?

Here's a clue

      Unknown,

      Command,

      File,

      Label,

      Menu,

      Query,

      Report,

      Form,

      Class,

      Table,

      Database,

      Project,

      Memo,

      Vue,

      Procedure,

      Classlib,

      View,

#endif

USE SYS(2005) AGAIN ALIAS fuser

SELECT * from fuser WHERE id = "MRU" ORDER BY id INTO CURSOR foo

SCAN

      cData=data

      ?id

      ALINES(aa,SUBSTR(cData,3),0,CHR(0))

      FOR i = 1 TO ALEN(aa)

            ?SPACE(5),aa(i)

      ENDFOR

ENDSCAN

Comments

  • Anonymous
    March 24, 2006
    This is GREAT stuff!  Thanks Calvin!!

    Most Recently Used entries: MRUB (programs), MRUC (text files), MRUE (menus), MRUH (forms), MRUL (projects), MRUS (tables), MRUT (start folders)
  • Anonymous
    March 26, 2006
    Thanks for code,
    but 2 little corrections:
    1.
    SET ANSI OFF
    2.
    ALINES(aa,SUBSTR(cData,3),.F.,CHR(0))
    && parameter lTrim must be logical (at least for VFP8)



  • Anonymous
    March 27, 2006
    This must be what feeds the drop downs you you enter modify command, e.g.
  • Anonymous
    March 31, 2006
     
    In my prior two posts (This code queries the foxuser resource file. What does it do? and More...
  • Anonymous
    January 20, 2009
    PingBack from http://www.hilpers-esp.com/320645-set-resource