根据文件的类型启动应用程序并打开文件，请问怎样实现？

Question

根据文件的类型启动应用程序并打开文件，请问怎样实现？把文件名读到delphi的一些控件中比如Tlistbox中，只要在ListBox中点击文件文件名，就能根据文件的类型启动应用程序并打开文件，请问怎样实现？

Answer 1

直接 shellexec('open ' + fullfilename,0)或者winexec

Answer 2

shellexecute(application.Handle, 'open', 'Iexplore.exe', '', nil, SW_NORMAL);