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 <[email protected]>
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
