一个关于注册表的问题

Question

直接这样写，不行吗？
procedure TForm1.Button3Click(Sender: TObject);
Var
 RegF:TRegistry;
 str:String;
begin
    RegF:=TRegistry.Create;
    RegF.RootKey:=HKEY_LOCAL_MACHINE;
    str:='"{c95fe080-8f5d-11d2-a20b-00aa003c157a}"';
    try
        RegF.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Run',True);
        RegF.WriteString('Interbase Server',str);
    except
    End;
    RegF.CloseKey;
    RegF.Free;
end;

Answer 1

有热情，应该给他加分！！！！！！！