小弟用OPENDIALOG让用户选择文件，用户选择了优盘中的一个文件后，不能停用优盘（在2000下）？

Question

小弟用OPENDIALOG让用户选择文件，用户选择了优盘中的一个文件后，不能停用优盘（在2000下）？
我已经把opendialog.filename和initdir两个属性设置到c:\abc.txt了也不行；
但是用户重新选择另外一个文件后，就可以停用优盘；
关闭应用程序也可以停用优盘；
关闭当前窗口也不可以停用（opendialog放在DATAMODULE中和动态创建都试过了）；
急，哪位老哥指导一下！
谢谢！！！

Answer 1

那是因为你打开的文件没有关掉，用API关掉就可以了

Answer 2

选完文件后：SetCurrentDirectory(PChar(ExtractFilePath(Application.ExeName)));