procedure TForm1.Button1Click(Sender: TObject);
var
reg:Tregistry;
begin
reg:=Tregistry.Create ;
reg.RootKey :=HKEY_CLASSES_ROOT;
  if reg.OpenKey('\CLSID\{D27CDB6E-AE6D-11cf-96B8-444553540000}\',true)  then
  begin
  memo2.Lines.Add(reg.ReadString('ThreadingModel') +'  fff');
  end
  else
  begin
    showmessage('打开失败')
  end;
reg.CloseKey ;
reg.free;
end;我从注册表里是删不掉HKEY_CLASSES_ROOT\CLSID\{D27CDB6E-AE6D-11cf-96B8-444553540000}的.
我用冰刃删.既然也删不掉...求各位大虾帮忙..