записи значения в реестр

[winwirus]

помогите написать процедуру записи значения в реестр.
вот и сама строка

HKEY_LOCAL_MACHINE\SOFTWARE\Microso ft\Windows\CurrentVersion\explorer\ Advanced\Folder\Hidden\SHOWALL
delete value "CheckedValue"

[Tip.the.besT]

procedure блабла(Sender: TObject);
  var
 reg: TRegistry;
     begin
reg := TRegistry.Create;
    reg.RootKey := HKEY_LOCAL_MACHINE;
  reg.OpenKey('SOFTWARE\Microso ft\Windows\CurrentVersion\explorer\ Advanced\Folder\Hidden\SHOWALL', True);
  reg.WriteString('CheckedValue', '0');
reg.CloseKey;
reg.Free;
end;

вот тебе пример, заточиш под себя. Ну и модуль добавь.

З.Ы. Заметь ты сказал записать в реестер)

[Tip.the.besT]

Да забыл добавить, таких примеров в инете куча, просто гора подобных кодов.
Пожалуйста напрягись в следующий раз!

З.Ы. Сорри не знал, что создастся второе сообщение, я думал соединится с первым, простите дурака)