Alterar e-mail padrão pelo Registro
Caros colegas,
Preciso alterar o registro [HKEY_LOCAL_MACHINE\SOFTWARE\Clients\Mail] do windows pela minha aplicação. Estou tentando alterar o valor DEFAULT desta chave, mas quando tento alterar é criado uma nova chave mas não altera a mesma.
procedure TForm1.Button1Click(Sender: TObject);
var reg: TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.OpenKey(´\SOFTWARE\Clients\Mail´, False);
Reg.WriteString(´(Default)´, ´Lotus Notes´);
{ERRO: É criado um novo String Value com o Nome (Default) com
o conteúdo Lotus Notes, mas não modifica o (Defautl) atual
para Lotus Notes}
finally;
end;
end;
O que devo fazer para alterar este Key Value ?
Grato pela atenção.
Preciso alterar o registro [HKEY_LOCAL_MACHINE\SOFTWARE\Clients\Mail] do windows pela minha aplicação. Estou tentando alterar o valor DEFAULT desta chave, mas quando tento alterar é criado uma nova chave mas não altera a mesma.
procedure TForm1.Button1Click(Sender: TObject);
var reg: TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
Reg.OpenKey(´\SOFTWARE\Clients\Mail´, False);
Reg.WriteString(´(Default)´, ´Lotus Notes´);
{ERRO: É criado um novo String Value com o Nome (Default) com
o conteúdo Lotus Notes, mas não modifica o (Defautl) atual
para Lotus Notes}
finally;
end;
end;
O que devo fazer para alterar este Key Value ?
Grato pela atenção.
Mcsimoes
Curtidas 0
Respostas
Beppe
15/10/2003
Use Reg.WriteString(´´, ´Lotus Notes´);
´(Default)´ que aparece no regedit é só para visualização. A string nula é a padrão.
Ataliba
´(Default)´ que aparece no regedit é só para visualização. A string nula é a padrão.
Ataliba
GOSTEI 0