var
vReg: TRegistry;
begin
vReg := TRegistry.Create;
try
vReg.RootKey := HKEY_LOCAL_MACHINE;
if vReg.RegistryConnect('\comp1') then
begin
vReg.OpenKey('SOFTWARE\Test\Text',True);
vReg.WriteString('AAA', 'BBB');
vReg.CloseKey;
end;
finally
vReg.Free;
end;
//** esquire01@hotmail.com
// Çok kullanıcılı bir program yazdığınızda programınızın üzerinde olduğu server bilgisayar
//**registry sine erişmeniz gerekirse bunu kullanın.