怎样注册自己的文件类型

让WINDOWS认识你开发出来的文件

我们知道，安装好WPS或者WORD以后，就可以编辑DOC文件，并且可以在双击这个DOC文件的时候调出相应的编辑程序，这个效果看起来很让人有成就感，其实，要做到这个效果很简单，你自己也可以注册一个新的文件类型，最基本的工作原理是这样的，WINDOWS是通过文件的后缀名称来识别文件类型的，所以你只需要写注册表就可以增加你自己的新文件类型，当然，还是建议你不要搞破坏，不要使用已经存在的后缀，例如DOC什么的。结合到我发布的免费写字板软件，我是这样注册的，见下面的代码：

procedure RegisterFile;

var Reg: TRegistry;

begin

  Reg := TRegistry.Create;

  try

    Reg.RootKey := HKEY_CLASSES_ROOT;

      Reg.OpenKey('\.note', True); // 文件后缀

      Reg.WriteString('', 'notefile');

      Reg.OpenKey('\notefile', True);

      Reg.WriteString('', '安仕达文档');

      Reg.OpenKey('\notefile\DefaultIcon', True);

      Reg.WriteString('', Application.ExeName + ', 1');

      Reg.OpenKey('\notefile\shell\open\command', True);

      Reg.WriteString('', Application.ExeName + ' "%1"');

  finally

    Reg.Free;

  end;

end;

程序必须需要支持WINDOWS的调用

当用户双击某个你定义的时候，WINDOWS会将文件名称自动作为参数来调用之前你注册的文件编辑器，所以你应该写出类似下面这样的代码。

procedure TForm_RVEditor.FormShow(Sender: TObject);

begin

CAPTION := 'Mstarsoft Rich Editor Ver '+AppVer ;

RegisterFile ;

  try

  if paramcount>0 then

  begin

    FDefaultFileName := ParamStr(1) ;// 这个就是传进来的文件名称了

    StatusBar.SimpleText := FDefaultFileName ;

    __DoOpen ;

  end ;

  except

  end ;

end;

怎么样，是很简单吧，建议大家自己动手享受一下。