[TR#ll]

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

Суть дела в том, что при запуске прога должна сверять установленное значение в реестре и в зависимости от этого ставить (или убирать) Checkbox...

Конкретный пример:
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion]
"RegDone"="1"
- если стоит 1, то ChekBox включен,
если стоит 2 - выключен...

Очень жду вашей помощи!!!
Спасибо!

[Aristarh Dark]

Пишу прямо тут, не проверяя

Код:

uses Registry;
var reg:TRegistry;
begin
  reg:=TRegistry.Create(KEY_READ);
  with reg do
     begin
        RootKey:=HKEY_LOCAL_MACHINE;
        if OpenKey('\SOFTWARE\Microsoft\Windows NT\CurrentVersion',false) then
          MyMegaCheckBox.Checked:=ReadInteger('RegDone')=1;
     end;
  reg.free;
end

примерно так