我现在做了一个程序。里面加入很多的视频都是 mpge4格式的 avi ，需要安装一个mpge4的执行文件。我想实现的是在程序开始先检测机器是否有安装这个*.exe 的文件。如果没有安装。就进行安装。如果安装了就进行程序。（这个mpge4的执行文件就是豪杰超级解霸里面带的那个 instmpg4.exe）

很着急。谢谢解答 。。。。

rock 帮我一下

检查windows系统文件夹的sysytem文件夹下是否存在DivXa32.acm文件。

我用什么函数来判断是否有这个文件

filetype("winnt\\system\\divxa32.acm")=0

用这个语句来判断可以么？

请问 getOSDirectory()是外部函数么？

win2000和win98的系统文件夹是不一样的。肯顶要判断才能找到文件夹啊

--全屏
Cover()
--调用instmpg4.exe文件
x:=getOSDirectory()
if FileType(y:=x^"\\system\\divxa32.acm")=0 then
result:=MessageBox(WindowHandle,"您的机器还没有安装DivXa32.acm,现在即将为您安装，是否要继续？","HighCOM",1)
if result=1 then
JumpOutReturn(FileLocation^"INSTMPG4.EXE")
else if result=2 then
GoTo(IconID@"初始化")
end if
end if
我这么写帮我看看对不对？

skcyh在上个帖子中说

引用:

---

getOSDirectory()---是au系统的外围函数
是au中的xtras--fileio中的

x:=getOSDirectory()---获取系统目录---各系统的系统目录本来就是不同的,此函数是调用系统级接口的函数换算得到当前系统目录路径的


y:=x^"\\system\\divxa32.acm"---用变量y得到所要文件在系统中预定的位置

---

2K系统的系统目录是system32
还是需要判断的。。呵呵

buddy.x32/u32
SysFolder
Platform: Windows and Macintosh
Description: baSysFolder gets the location of a special Windows directory.
Usage: Result = baSysFolder( Folder )
Arguments: String.
Folder is the name of the folder to return. Can be one of the following:
Windows:
"windows" returns the Windows folder
"system" the System folder
"system16" the Windows System folder for 16 bit files
"system32" the Windows System folder for 32 bit files
"temp" the folder used for temporary files
"current" the current DOS directory
"desktop" the desktop folder
"common desktop" the common desktop folder for all users
"groups" the program groups folder in the start menu
"common groups" the common program groups folder for all users
"start menu" the start menu folder
"common start menu" the common start menu for all users
"personal" the users personal documents folder
"favorites" the users favorites folder
"startup" the 'Start Up' program group folder
"recent" the 'Recent documents' folder
"sendto" the 'Send To' folder
"network" the 'Network Neighborhood' folder
"fonts" the 'Fonts' folder
"shellnew" the new documents template folder
"program files" the program files folder
"common files" the common folder in the program files folder
Macintosh:
"system" the System Folder
"prefs" the Preferences folder
"temp" the Temporary Items folder on the startup disk
"desktop" the Desktop folder on the startup disk
"trash" the trash can
"startup" the Startup Items folder
"apple" the Apple Menu Items folder
"control panels" the Control Panels folder
"extensions" the Extensions folder
"fonts" the Fonts folder
"boot" the name of the start up disk
Returns: String.
Returns the requested folder.
Examples: Director:
set WinDir = baSysFolder( "windows" )
Authorware:
WinDir := baSysFolder( "windows" )
Notes: The string that is returned will have a "\" (Windows) or ":" (Mac) at the end.
The "system16" and "system32" options are for use with Windows NT. On other
versions of windows, they will return the same as "system".