** This seems to work
*SET SAFETY off
CLOSE ALL
CLEAR ALL

USE c:MyProject.pjx
COPY TO Watch
CLOSE ALL
ALTER TABLE watch ADD COLUMN num c(10)
ALTER TABLE watch ADD COLUMN file_name c(250)
ALTER TABLE watch ADD COLUMN ext c(10)
CLOSE ALL
USE watch
PACK

REPLACE ALL file_name WITH name
REPLACE ALL ext WITH SUBSTR(file_name, LEN(ALLTRIM(file_name)) - 3 , LEN(ALLTRIM(file_name)) )
SELECT * from watch INTO TABLE tt ORDER BY ext, file_name

REPLACE ALL ext WITH STRTRAN(ext,CHR(0),"")
REPLACE ALL file_name WITH STRTRAN(file_name,CHR(0),"")
REPLACE ALL num WITH ALLTRIM(STR(recno())) +" of "+ ALLTRIM(STR(reccount()))

GO top
BROWSE FIELDS num,file_name,ext WIDTH 40 && list of proj files