Вот 2 процедурки, работает 100%, 1-я записывает в раздел локал_машин - YourSoftwareName - ключ M - значение твоего едита. 2-я баттн читает и всовывает, я думаю сможешь сам это втсавить просто в Form.Activate (просто вместо баттн1.клик).



procedure TForm1.Button1Click(Sender: TObject);
var Reg : Tregistry;

begin

Reg := TRegistry.Create;

Reg.RootKey:=HKEY_LOCAL_MACHINE;
Reg.OpenKey('Software\YourSoftwareName',true);
Reg.WriteString('M', Edit1.Text);
Reg.CloseKey;
Reg.Destroy;
end;

procedure TForm1.Button2Click(Sender: TObject);
var Reg : Tregistry;
begin
Reg := TRegistry.Create;

Reg.RootKey:=HKEY_LOCAL_MACHINE;
Reg.OpenKey('Software\YourSoftwareName',true);
Edit1.Text:=Reg.ReadString('M');
Reg.CloseKey;
Reg.Destroy;
end;

end.

Есси не сложно поставь +