Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

problem sa RegSaveKey funkcijom

[es] :: Pascal / Delphi / Kylix :: problem sa RegSaveKey funkcijom

[ Pregleda: 2414 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Nemanja_666
Nemanja Tatic
Gradiska

Član broj: 116292
Poruke: 221
87.250.102.*



+19 Profil

icon problem sa RegSaveKey funkcijom23.12.2007. u 02:37 - pre 198 meseci
Radim neki program i potrebno mi je da uradim backup nekih kljuceva u registriju.

Probao sam na dva nacina:

Code:

var
  Reg : TRegistry;
begin
  Reg := TRegistry.Create;
  Reg.Rootkey := HKEY_CURRENT_USER;
  Reg.Savekey('\Software\Blablabla', 'blablabla.reg');
end;


i

Code:

var
  RootKey, phKey: HKey;
  Key : string;
begin
  RootKey := HKEY_CURRENT_USER;
  Key := '\Software\Blablabla';
  RegOpenKeyEx(RootKey, PChar(Key), 0, KEY_ALL_ACCESS, phKey);
  RegSaveKey(phKey, PChar('test.reg'), nil);
  RegCloseKey(phKey);
end;


Program pokren sa administratorskim provilegijama (na visti) i nikad mi ne uradi sta se ocekujem :)

Ako ima neko resenja osim:

Code:

  ShellExecute(Handle, 'open', PChar('regedit.exe /e Key Filename'), '', sw_hide) ;


Pozz
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739



+92 Profil

icon Re: problem sa RegSaveKey funkcijom23.12.2007. u 11:08 - pre 197 meseci
> Radim neki program i potrebno mi je da uradim backup nekih kljuceva u registriju.

Koje greške dobijaš, možeš saznati sa GetLastError ili RaiseLastOSError.
Pokušaj da stavke otvaraš sa KEY_READ pravom pristupa ne sa KEY_ALL_ACCESS.
 
Odgovor na temu

Nemanja_666
Nemanja Tatic
Gradiska

Član broj: 116292
Poruke: 221
87.250.102.*



+19 Profil

icon Re: problem sa RegSaveKey funkcijom23.12.2007. u 13:23 - pre 197 meseci
Pokusao sam sa KEY_READ i nije opet radilo.
Greska koju dobijem kad koristim funkciju koju se spomenuo gore je "A call to an OS function fail"
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739



+92 Profil

icon Re: problem sa RegSaveKey funkcijom23.12.2007. u 15:27 - pre 197 meseci
> Greska koju dobijem kad koristim funkciju koju se spomenuo gore je "A call to an OS function fail"

Posle koje fukcije? Da li tvoj proces ima SE_BACKUP_NAME privilegiju?

Code:

var
  RootKey, phKey: HKey;
  Key : string;
  lRet: Longint;
begin
  RootKey := HKEY_CURRENT_USER;
  Key := 'Software\BitTorrent';
  lRet := RegOpenKeyEx(RootKey, PChar(Key), 0, KEY_READ, phKey);
  if lRet = ERROR_SUCCESS then
  begin
    lRet := RegSaveKey(phKey, PChar('C:\test.reg'), nil);
    if lRet <> ERROR_SUCCESS then
      raise Exception.Create(SysErrorMessage(lRet));
  end
  else
    raise Exception.Create(SysErrorMessage(lRet));
end;


 
Odgovor na temu

Nemanja_666
Nemanja Tatic
Gradiska

Član broj: 116292
Poruke: 221
87.250.102.*



+19 Profil

icon Re: problem sa RegSaveKey funkcijom23.12.2007. u 18:19 - pre 197 meseci
> Da li tvoj proces ima SE_BACKUP_NAME privilegiju?

Ocito nema. Greska sa ovim tvojim kodom "A required privilege is not held by the client".

Ako znas pomozimi kako da ovo resim.
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739



+92 Profil

icon Re: problem sa RegSaveKey funkcijom23.12.2007. u 20:17 - pre 197 meseci
Downloaduj JCL i pozovi JclSecurity.EnableProcessPrivilege(True, 'SeBackupPrivilege');
 
Odgovor na temu

Nemanja_666
Nemanja Tatic
Gradiska

Član broj: 116292
Poruke: 221
87.250.102.*



+19 Profil

icon Re: problem sa RegSaveKey funkcijom23.12.2007. u 21:07 - pre 197 meseci
Hmmm nisam se sjetio toga.
Idem sad malo plofetati kako to radi.
Hvala.
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: problem sa RegSaveKey funkcijom

[ Pregleda: 2414 | Odgovora: 6 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.