谁来帮帮我吧!

Question

特定的exe文件打开可以修改注册表，随便建立扩展名为123的文件，双击它，选择用notepad打开，然后研究注册表HKEY_CLASS_ROOT//.123和123file两个键
调用打开方式对话框的不知道。

Answer 1

用TOPENDIALOG控件得到要打开的文件名(在FILTER属性中指定打开文件的类型),再用SHELLEXC之类的函数调用指定的程序,并用这个文件名做为程序参数即可.

Answer 2

命令如下：
if opendialog1.execute then
  ShellExecute(handle,'open','rundll32.exe',pchar('shell32.dll,OpenAs_RunDLL '+opendialog1.filename),nil,sw_show);