Czemu nie działa udostępnianie ?

Cześć :)

Chciałem zrobić sobie z poziomu programu odostępnianie podanego folderu, no i coś mi nie działa :-/ Nie wiem z jakiejgo powodu ?
Może ktoś mi wyjaśni co jest grane ?
Udostępniam katalog z poziomu Windy i jest ok, a z poziomu programu
nie działa hmmm.. wpisy do rejestru te same a jednak nic :-/
Poniżej podaje kod jaki używam:

PROCEDURE TForm1.Button1Click(Sender: TObject);
var
reg: TRegistry;
begin
  reg:= TRegistry.Create;
   try
    reg.RootKey:= HKEY_LOCAL_MACHINE;
    reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Network\LanMan\WARSZTAT', True);
    reg.WriteString('Path','D:\WARSZTAT' );
    reg.WriteInteger('Flags', 401);
    Reg.WriteInteger('Type', 0);
    reg.WriteBinaryData('Parm2enc', a,0);
    reg.WriteBinaryData('Parm1enc', a,0);
   //te dwie linie poniżej zamieniłem tymi co powyżej bo nie używam hasła
   // reg.WriteBinaryData('Parm2enc', haslo, SizeOf(haslo));
   // reg.WriteBinaryData('Parm1enc', haslo, SizeOf(haslo));
    reg.WriteString('Remark', 'udostępniony do odczytu');
  finally
   reg.Free;
  end;
End;

Po kliknięciu na button wpisuje się prawidłowo w rejestry - taki sam wpis jakbym "ręcznie" udostępniał z poziomu windozy, nic nie brakuje a jednak nie działa :-/
Czyżby gdzieś jeszcze w innym kluczu miałbyć dodatkowy wpis ?

No już wiem co jest grane - wszystko jest ok tylko trzeba odświeżyć rejestr (po resecie kompa, katalog jest udostępniony).
Ale takie działanie jest po [CIACH!] :-/
Sklerotyk jestem i już nie pamiętam jak kiedyś odświeżałem rejest zaraz
po wprowadzeniu do niego zmian we wpisach :-/
Proszę więc o poradę - Jak odświeżyć rejestr tak by system od razu zareagował i żebym nie musiał robić resetu kompa ?

Hmm.. jeszcze jedno mnie zastanawia jak jest zrobione w Kazie udostępnienie folderu "My Shared Folder" skoro nie ma w tym powyższym kluczu żadnego wpisu ? A przecież jeśli zeskanować kompa
pod względem udostępnionego zasobu to wyświetli własnie tą nazwe folderu ;) No i na dodatek w żadnym explorerze plików nie widać standardowej ikonki udostępnionego folderu (folder z ręką)

To tak na boku ;) a najważniejsze to co pisałem o odświeżaniu rejestru :)

Hmm.. jeszcze jedno mnie zastanawia jak jest zrobione w Kazie udostępnienie folderu "My Shared Folder" skoro nie ma w tym powyższym kluczu żadnego wpisu ? A przecież jeśli zeskanować kompa
pod względem udostępnionego zasobu to wyświetli własnie tą nazwe folderu ;) No i na dodatek w żadnym explorerze plików nie widać standardowej ikonki udostępnionego folderu (folder z ręką)

Kazaa to virus [diabel]

A co do odświeżania to chyba RegFlushKey, ale głowy uciąć nie dam.

Dzięki Sheitar , dopisałem RegFlushKey(HKEY_LOCAL_MACHINE); ale
nic nie zadziałało :-(
Przejrzałem jeszcze dodatkowo cały kod biblioteki Registry.pas - procedury i funkcje ale coś nie mogę trafić na odpowiednią instrukcje do odświeżenia.