Hi,

Filenames are not converted to uppercase by Harbour functions such as
Directory() was in Clipper.


  #include "Directry.ch"

  FUNC MAIN()

    aDirectory := DIRECTORY("*.txt", "D")
    AEVAL( aDirectory, {|aFile| QOUT(aFile[F_NAME])} )

  RETURN

  /*

  __ HARBOUR (02/03/2010  01:18 PM                 5 test.txt)

  C:\hbm>hello

  ---------------------

  __ CLIPPER (02/03/2010  01:15p                  11 test.txt)

  C:\ver8\PRGS>hello.exe

  TEST.TXT

  */


-- 
smu johnson <smujohn...@gmail.com>
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to