Just run msinfo.exe or:

#define HKEY_LOCAL_MACHINE	0x80000002
#define gREGKEYSYSINFO		"SOFTWARE\Microsoft\Shared Tools\MSINFO"
#define gREGVALSYSINFO		"PATH"
#define SW_NORMAL			1

DECLARE LONG ShellExecute IN SHELL32.DLL ;
    LONG nWinHandle, STRING cOperation,;
    STRING cFileName, STRING cParameters,;
    STRING cDirectory, INTEGER nShowWindow

Local lcSysInfoPath

* Try To Get System Info Program Path\Name From Registry...
oReg = NewObject("registry", "\classes\registry.prg")
lcSysInfoPath = oReg.ReadRegistryString(HKEY_LOCAL_MACHINE, gREGKEYSYSINFO, gREGVALSYSINFO)

If ShellExecute(0, "open", lcSysInfoPath, "", "", SW_NORMAL) <= 32
	MessageBox("System Information Is Unavailable At This Time")
endif

>Pressing the System Info... button on the About Visual Foxpro dialog calls up a nice dialog full of information about the computer, Hardware resources, software environment, etc. Can I call this dialog from my application? If so, how?
>
>Thanks,
>Al