odzczyt 2 kluczy z 2 programów

jak odczytać klucz z dwóch innych programów

var
Reg : TRegistry;
KeyExists : Boolean;
s : String;
begin
Reg := TRegistry.Create;
try
Begin
KeyExists := Reg.OpenKey('Software\program1\Settings', False); // otworz klucz
Label1.Caption := Reg.ReadString('Key');
end;
begin
KeyExists := Reg.OpenKey('Software\program2\Settings', False);
Label2.caption := Reg.ReadString('Key');
end;

finally
Reg.Free;
end;
end;

jak to ma wyglądać bo wyskakuje mi błąd[code][Hint] Main.pas(36): Value assigned to 'KeyExists' never used
[Hint] Main.pas(31): Variable 's' is declared but never used in 'TForm1.FormCreate'[/code]
co to moze byc czemu tak nie idzie

var
Reg : TRegistry;
begin
Reg := TRegistry.Create;
try
Begin
Reg.OpenKey('Softwareprogram1Settings', False); // otworz klucz
Label1.Caption := Reg.ReadString('Key');
end;
begin
Reg.OpenKey('Softwareprogram2Settings', False);
Label2.caption := Reg.ReadString('Key');
end;

finally
Reg.Free;
end;
end;

tak mniej-wiecej to powinno wygladac.
a to co Ci wyskakuje to nie błędy tylko podpowiedzi, że zmienne 'keyexists' i 's' nie sa przez Ciebie urzywane, mimo że je zadeklarowaleś.
ale bez tych zmian program i tak powinien sie skompilowac