Как применить изменение в реестре?

[KWN, lnc]

Залил параметр в реестр и столкнулся с одной проблемой.
Чтобы увидеть эти изменения необходимо обновить как я понел реестр (клавиша F5) по рабочему столу помогает! а как сделать это программно???

и заранее этот код мне не помог.

SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, nil, nil);

[uberchel]

Вроде так , насколько помню

ShellExecute(0,'open',pchar('regedit'),pchar('/r'),nil,SW_HIDE);

ищё так из DelphiWorld!

Необходимо послать всем окнам сообщение WM_WININICHANGE с указанием полного адреса измененного адреса ключа.



procedure TForm1.Button1Click(Sender: TObject);
begin
  SendMessage(HWND_BROADCAST, WM_WININICHANGE, 0,
    LongInt(PChar('RegistrySection')));
end;

[KWN, lnc]

uberchel непомогло! есть еще варианты???