如何在注册表上注册自己编写的软件？

Question

yangcl()　:
 用DELPHI怎么实现？？

Answer 1

用TRegistry来写。一般的作法是：
HKEY_CLASSES_ROOT\.xxx中有一项@=xxxfile
然后HKEY_CLASSES_ROOT\xxxfile下有子键shell\open\command，在其中有@=程序路径 '%1'

Answer 2

var
  reg: TRegistry;
begin
  reg := TRegistry.Create;
  reg.RootKey := HKEY_CLASSES_ROOT;
  reg.OpenKey( '\.XXX', True );
  reg.WriteString( '', 'XXXfile' );  reg.OpenKey( '\XXXfile', True );
  reg.WriteString( '', 文件的名称 );
  
  reg.OpenKey( 'shell\open\command', True );
  reg.WriteString( '', '"'+Application.ExeName+'" "%1"' );
  
  reg.Free;  // XXX应该用实际的扩展名代替