Thursday, December 15, 2005

uses Registry;

.
.

procedure OdstranZaznamZRegistru;
var key: string;
Reg: TRegIniFile;
begin
key:='\Software\Microsoft\Windows\CurrentVersion\Run';
Reg:=TRegIniFile.Create;
try
Reg.RootKey:=HKey_Local_Machine;
if Reg.OpenKey(Key,False) then Reg.DeleteValue('Kalkulacka');
finally
Reg.Free;
end;
end;
Obě tyto funkce berte samozřejmě jako pouhý zjednodušený příklad. Vylepšit je a doplnit např. o parametry (výběr větve registru, soubor, případně kontrola bezchybného zápisu), aby byly univerzálnější, jistě zvládnete již sami.