FoxPro/Visual FoxPro - Visual Foxpro permite saber que Programas estan instalados en la Pc

Estimados Amigos
Buenos Tardes queria saber si es que desde Visual Foxpro nos permite poder saber q programas estan
instalados en una Pc o Equipo de Computo y de alli poder generar un listado o reporte de lo tiene.

De antemano mil Gracias

Jesus

prueba esto

cCmdLine="command.com /c reg query HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall /s >c:\tmp\65898934.tmp"
DECLARE INTEGER WinExec IN kernel32 STRING cCmdLine, INTEGER nCmdShow
=WinExec(cCmdLine,0)
*a=1
DO WHILE FILE("c:\tmp\65898934.tmp")=.f.
* WAIT "Va: "+STR(a) WINDOW NOWAIT
* a=a+1
ENDDO
DO WHILE .t.
esta=FOPEN("c:\tmp\65898934.tmp",12)
IF esta<>-1
FCLOSE(esta)
EXIT
ENDIF
enddo
CREATE CURSOR TmpCur1 (mVar c(250))
APPEND FROM c:\tmp\65898934.tmp TYPE SDF
*BROWSE FOR mVar#" "
*BROWSE FOR LEFT(mvar,15)=" DisplayName"
COPY TO c:\tmp\tmpcur FOR LEFT(mvar,15)=" DisplayName" TYPE fox2x
USE c:\tmp\tmpcur
replace ALL mvar WITH SUBSTR(mvar,24,50)
IF thisform.check1.Value=1
DELETE FOR "(KB"$mvar
DELETE FOR "Security Update"$mvar
ENDIF
SELECT soft
ZAP
APPEND FROM c:\tmp\tmpcur
MESSAGEBOX("Proceso concluido puede saccar el reporte",0)
USE IN tmpcur

Mil Gracias lo Probare y te aviso