如何在delphi中编程实现让系统用默认的程序打开文件？？

例如：txt文件系统默认用记事本打开，JPG文件系统默认用画图打开。

解决方案 »

  1.   

    用ShellExecute这个函数就可以了，这个函数打开的文件就是当前文件是用什么文件关联的程序，它就会用那个程序打开，比如:*.txt的文件，如果系统黙认是记事本，它就会用记事本打开，如果是EditPlus，它就会用EditPlus打开了..
    用之前要uses ShellApi这个单元..
    用法:
    str := 'c:\a.doc';
    ShellExecute(Self.handle,'open',PAnsiChar(str),'','',SW_SHOWNORMAL);
      

  2.   

    但是在编译时不认SW_SHOWNORMAL这个常量