请问怎么建立程序与文件之间的关联？

Question

用注册表函数。
在HKEY_CLASSES_ROOT下建立一个项，命名为你指定的文件后缀名。
在该项下设置shell\open\command值为“程序路径 1%”(1%表示参数一）
如有疑问，打开注册表看看便知。

Answer 1

例
HKEY_CLASSES_ROOT\mp3file\shell\open\command
中缺省建值为C:\a.exe %1
就使用c:\a.exe打开mp3

Answer 2

你当然可以用Delphi 的TRegistry直接工作
如下面是Delphi的例子var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    if Reg.OpenKey('\Software\Microsoft\Windows\CurrentVersion\RunOnce', True) then
   begin
      Reg.WriteString('MyApp','"' + ParamStr(0) + '"');
      Reg.CloseKey;
    end;
  finally
    Reg.Free;
    inherited;
  end;